-- file SakuraOps.Mesa
-- last modified by Satterthwaite, January 12, 1981  10:24 AM
-- last edit by Russ Atkinson,  9-Jul-81 14:01:10
-- last edited by Suzuki,  7-Sep-81 16:50:36

DIRECTORY
  IOStream: TYPE USING [Handle],
  SakuraTree: TYPE USING [Link],
  Rope: TYPE USING [Ref];

SakuraOps: DEFINITIONS =
  BEGIN OPEN SakuraTree;

 -- interface procedures

  GetSource: PROC RETURNS [Rope.Ref];
  GetLog: PROC RETURNS [IOStream.Handle];
  SetLog: PROC [IOStream.Handle];

  ParseStream:
     PROC [source: Rope.Ref _ NIL, log: IOStream.Handle _ NIL, 
           pretty, times: BOOLEAN _ TRUE, debug: BOOLEAN _ FALSE] 
          RETURNS [root: Link];

 -- module interfaces

  TableId: TYPE = MACHINE DEPENDENT {parse, error, debug, (255)};
  TableHandle: TYPE [2];

  END.