include window
# test input through unget_wch queue
wchar ACHAR 0x3401
wchar NL "\n"
call OK unget_wch $NL
call OK unget_wch $ACHAR
call OK wmove $win1 2 3
noinput
call2 OK $ACHAR wgetn_wstr $win1 2

# test erase and kill character processing,
# enable canonical mode; kill should erase whole line
call OK cbreak
wchar res ["c", "d", "f"]
call OK wmove $win1 3 0
input "ab\025cde\010fghi\n"
call2 OK $res wgetn_wstr $win1 4

# test keypad translations
wchar res ["a", "c", "\e", "O", "D"]
call OK wmove $win1 4 0
input "ab\010c\eOD\n"
call2 OK $res wgetn_wstr $win1 6

call OK keypad $win1 $TRUE
wchar res ["a", "b", "d"]
call OK wmove $win1 5 1
input "abc\eODd\n"
call2 OK $res wgetn_wstr $win1 4

compare wgetn_wstr.chk