DEFINITION MODULE Console ;

(* Host console output for the MC64 virtual machine. *)

FROM SYSTEM IMPORT ADDRESS ;

EXPORT QUALIFIED WriteChar, WriteString, WriteN, WriteLn, WriteInt,
  WriteLongInt, WriteLongCard, WriteBool, WriteReal, Fatal ;

PROCEDURE WriteChar (c: CHAR) ;
PROCEDURE WriteString (s: ARRAY OF CHAR) ;
PROCEDURE WriteN (p: ADDRESS; n: CARDINAL) ;
PROCEDURE WriteLn ;
PROCEDURE WriteInt (i: INTEGER) ;
PROCEDURE WriteLongInt (l: LONGINT) ;
PROCEDURE WriteLongCard (u: LONGCARD) ;
PROCEDURE WriteBool (b: BOOLEAN) ;
PROCEDURE WriteReal (r: REAL) ;
PROCEDURE Fatal (msg: ARRAY OF CHAR) ;

END Console.