QuadIO.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Don Curry, March 16, 1987 4:57:43 pm PST
Last Edited by: Louis Monier April 2, 1987 4:47:56 pm PST
DIRECTORY
IO, SymTab;
QuadIO: CEDAR DEFINITIONS =
BEGIN
Memory:  TYPE = REF MemoryRec;
MemoryRec: TYPE = RECORD [sym: SymTab.Ref, wds: REF MemWords];
MemWords: TYPE = RECORD [SEQUENCE size: CARDINAL OF MemWord];
MemWord: TYPE = RECORD [add, data: Word];
Word:   TYPE = LONG CARDINAL;
QuadFileFormat: ERROR;
ReadFile:  PROC[fileName: IO.ROPE]      RETURNS[mem: Memory];
InterpAddr: PROC[addRope: IO.ROPE, mem: Memory] RETURNS[add: Word];
END.