include start
# test input through unget_wch queue
wchar ACHAR 0x3401
wchar NL "\n"
call OK unget_wch $NL
call OK unget_wch $ACHAR
call OK move 2 3
noinput
call2 OK $ACHAR get_wstr

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

# test keypad translations
wchar res ["a", "c", "d", "\e", "O", "D"]
call OK move 4 4
input "ab\010cd\eOD\n"
call2 OK $res get_wstr

call OK keypad STDSCR $TRUE
wchar res ["a", "b", "d"]
call OK move 5 1
input "abc\eODd\n"
call2 OK $res get_wstr

compare get_wstr.chk