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

# first character is non-spacing, hence it must fail
wchar FWSTR [0x300, "A"*2]
call ERR ins_wstr $FWSTR

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 move 10 10
call OK ins_wstr $NSTR
call OK refresh
call2 10 10 getyx STDSCR
compare ins_wstr2.chk

# This should result in just BB
wchar NSTR ["A"*3, "\r", "B"*2]
call OK move 20 0
call OK ins_wstr $NSTR
call OK refresh
compare ins_wstr3.chk

# Check handling of tabs
# first try inserting too many, it should fail
wchar TSTR [ "\t"*20 ]
call ERR ins_wstr $TSTR
call OK refresh
call2 20 0 getyx STDSCR
compare ins_wstr4.chk

# Now insert a few tabs...
wchar USTR [ "F", "\t"*3, "F" ]
call OK ins_wstr $USTR
call OK refresh
call2 20 0 getyx STDSCR
compare ins_wstr5.chk

