SunADotOut.Mesa
Copyright Ó 1988 by Xerox Corporation. All rights reserved.
Bill Jackson (bj) June 22, 1988 11:15:37 pm PDT
DIRECTORY IO, RedBlackTree, Rope, VM;
SunADotOut: CEDAR DEFINITIONS ~ {
Error: ERROR [ msg: Rope.ROPE ]; -- generic catch all for catastropies
Module: TYPE ~ REF ModuleObject;
ModuleObject: TYPE;
ModuleFromFile: PROC [ filename: Rope.ROPE ] RETURNS [ m: Module ];
ModuleFromStream: PROC [ s: IO.STREAM ] RETURNS [ m: Module ];
WriteModule: PROC [ s: IO.STREAM, m: Module ];
ItemProc: TYPE ~ PROC [ text: Rope.ROPE, data: REF ];
UndefinedNames: PROC [ m: Module, itemProc: ItemProc ];
}.