include start
cchar ch1 0x100 [0x3401]
cchar ch2 0x200 "A"
call OK ins_wch $ch1
call OK ins_wch $ch2
call OK refresh
call2 0 0 getyx STDSCR
compare ins_wch1.chk

call OK mvaddstr 10 75 "AAAA"
call OK refresh

# test shifting of above added characters, test do not wrap property
call OK move 10 10
call OK ins_wch $ch1
call OK ins_wch $ch1
call OK refresh
call2 10 10 getyx STDSCR
compare ins_wch2.chk

# test special character processing
call OK move 10 75
cchar NL 0x000 "\n"
call OK ins_wch $NL
call OK refresh

call OK add_wch $ch2
call OK refresh
call2 10 76 getyx STDSCR
cchar CR 0x000 "\r"
call OK ins_wch $CR
call OK refresh
compare ins_wch3.chk
