<> <> <> <> <> <<>> DIRECTORY IO, Rope; EBMesaLisp: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; Parse: PUBLIC PROC [stream: IO.STREAM] RETURNS [val: REF ANY ¬ NIL, endOfStream: BOOL ¬ FALSE]; Unparse: PROC [object: REF ANY, prettyPrintList: LIST OF REF ANY ¬ NIL] RETURNS [result: ROPE]; AddEntity: PROC [entity: REF ANY, entityList, ptr: LIST OF REF ANY] RETURNS [newList, newPtr: LIST OF REF ANY]; Member: PROC [list: LIST OF ATOM, member: REF ANY] RETURNS [isMember: BOOL ¬ FALSE, tail: LIST OF ATOM]; SyntaxError: PROC [stream: IO.STREAM, msg: ROPE]; ParseAborted: SIGNAL; ReadKeyword: PROC [stream: IO.STREAM] RETURNS [keyName: ROPE]; ReadRopeInParens: PROC [stream: IO.STREAM] RETURNS [rope: ROPE ¬ NIL]; ReadRopeInAngleBrackets: PROC [stream: IO.STREAM] RETURNS [rope: ROPE ¬ NIL]; ReadWWord: PROC [f: IO.STREAM] RETURNS [word: Rope.ROPE]; ReadChar: PROC [f: IO.STREAM, c: CHAR]; END.