| 123456789101112131415161718192021 |
- 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.
|