file: OutputDefs.mesa
last edited by Bruce on July 8, 1980 8:36 AM
last edited by Lewis on 9-Dec-80 10:14:41
last edited by Satterthwaite on August 13, 1982 2:36 pm
DIRECTORY
Format: TYPE USING [NumberFormat],
LongString: TYPE USING [SubString],
Streams: TYPE USING [Handle],
String: TYPE USING [SubString],
Time: TYPE USING [Packed];
OutputDefs: DEFINITIONS = {
outStream: Streams.Handle;
PutTab: PROC;
PutCR: PROC;
PutChar: PROC [c: CHAR];
PutString: PROC [s: STRING];
PutLongString: PROC [s: LONG STRING];
PutSubString: PROC [s: String.SubString];
PutLongSubString: PROC [s: LongString.SubString];
PutTime: PROC [t: Time.Packed];
OpenOutput: PROC [root: STRING, ext: STRING];
CloseOutput: PROC;
GetOutputStream: PROC RETURNS [Streams.Handle];
numbers
NumberFormat: TYPE = Format.NumberFormat;
PutOctal: PROC [val: UNSPECIFIED];
PutDecimal: PROC [val: CARDINAL];
PutNumber: PROC [val: CARDINAL, format: Format.NumberFormat];
}.