gm2-libs-pim/Keyboard

DEFINITION MODULE Keyboard ;

EXPORT QUALIFIED Read, KeyPressed ;

(*
   Read - reads a character from StdIn. If necessary it will wait
          for a key to become present on StdIn.
*)

Read
PROCEDURE Read (VAR ch: CHAR) ;

(*
   KeyPressed - returns TRUE if a character can be read from StdIn
                without blocking the caller.
*)

KeyPressed
PROCEDURE KeyPressed () : BOOLEAN ;

END Keyboard.