include window
cchar ch1 0x100 [0x3401]
cchar ch2 0x200 "A"
call OK wins_wch $win1 $ch1
call OK wins_wch $win1 $ch2
call OK wrefresh $win1
call2 0 0 getyx $win1
compare wins_wch1.chk

call OK mvwaddstr $win1 2 3 "AA"
call OK wrefresh $win1

# test shifting of above added characters, test do not wrap property
call OK wmove $win1 2 1
call OK wins_wch $win1 $ch1
call OK wrefresh $win1
call2 2 1 getyx $win1
compare wins_wch2.chk

# test special character processing
call OK wmove $win1 2 4
cchar NL 0x000 "\n"
call OK wins_wch $win1 $NL
call OK wrefresh $win1

call OK wadd_wch $win1 $ch2
call OK wrefresh $win1
call2 2 5 getyx $win1
cchar CR 0x000 "\r"
call OK wins_wch $win1 $CR
call OK wrefresh $win1
compare wins_wch3.chk