include start
wchar WSTR ["A", "A"*2, 0x3401, "A"*2]
call OK move 15 15
call OK mvins_wstr 0 0 $WSTR
call OK refresh
call2 0 0 getyx STDSCR
compare ins_wstr1.chk

call OK mvaddstr 10 75 "AAA"
call OK refresh

# test shifting of above added characters, test do not wrap property 
wchar NSTR ["A"*4]
call OK mvins_wstr 10 10 $NSTR
call OK refresh
call2 10 10 getyx STDSCR
compare ins_wstr2.chk