PL0-GNU-M2/CharacterInput.def

DEFINITION MODULE CharacterInput;

(* EXPORT QUALIFIED ch, GetCh, EOF,
		 currLine, currCol,endOfInput, InitInput;
*)


CONST EOF = 0C;

VAR  ch 	 : CHAR;
     currLine	 : CARDINAL;
     currCol	 : CARDINAL;
     endOfInput  : BOOLEAN;



PROCEDURE GetCh;

PROCEDURE InitInput;

END CharacterInput.