contrib/netbsd-tests/lib/libcurses/tests/timeout

   1 #
   2 # Validate the timeout works.
   3 #
   4 include start
   5 delay 2000
   6 input "a"
   7 call 97 getch
   8 call OK timeout 100
   9 input "b"
  10 # since delay is in effect and we set timeout the following getch should
  11 # return ERR not the character b.
  12 call -1 getch
  13 # drain input....
  14 call OK drain
  15 call OK timeout -1
  16 call OK keypad STDSCR 1
  17 delay 0
  18 input "\eOA"
  19 call $KEY_UP getch
  20 call OK refresh
  21 compare timeout.chk