MBOut.mesa
Edited by Sandman on 28-Jan-81 13:13:10
Edited by Lewis on 16-Sep-81 13:55:47
Edited by Levin on April 5, 1983 2:01 pm
DIRECTORY
Ascii USING [CR, SP, TAB],
Format USING [NumberFormat],
Segments USING [FHandle];
MBOut: DEFINITIONS =
BEGIN
Tab: PROC = INLINE {Char[Ascii.TAB]};
SP: PROC = INLINE {Char[Ascii.SP]};
CR: PROC = INLINE {Char[Ascii.CR]};
Spaces: PROC [n: CARDINAL];
Level: PROC [level: CARDINAL];
Char: PROC [c: CHARACTER];
Text: PROC [s: LONG STRING, columns: CARDINAL ← 0];
Line: PROC [s: LONG STRING];
Time: PROC [t: LONG CARDINAL];
FileName: PROC [f: Segments.FHandle];
Numbers
NumberFormat: TYPE = Format.NumberFormat;
Octal: PROC [val: UNSPECIFIED];
Decimal: PROC [val: CARDINAL];
LongNumber: PROC [val: LONG UNSPECIFIED, format: NumberFormat];
Number: PROC [val: UNSPECIFIED, format: NumberFormat];
Loadmap
OpenLoadmap: PROC;
END.