-- File: DisjointIODefs.mesa
-- Written by Martin Newell/Dan Fitzpatrick February 1981
-- Last edited: August 27, 1981  3:34 PM

DIRECTORY

DisjointTypes: FROM "DisjointTypes" USING [Symbol];

DisjointIODefs: DEFINITIONS =
BEGIN
OPEN DisjointTypes;

CIFInput: PUBLIC PROCEDURE[allSymbols: BOOLEAN, parent: Symbol];
-- Get layout from Magic database and make direct calls on Disjoint
-- allSymbols is true for ALL symbols, false for REFERENCED only
-- mainline will be hung on parent

CIFOutput: PUBLIC PROCEDURE [symbol: Symbol, callOnce: BOOLEAN, fileName: STRING];

WriteLongDecimal: PUBLIC PROCEDURE[n: LONG INTEGER];

WriteFloat: PUBLIC PROCEDURE[r: REAL];

PrintSymbols: PUBLIC PROCEDURE;

END.
(1792)\192b15B43b8B60i64I4i61I4i31I1b10B75b16B38b10B30b12B