-- PPRopeFile.mesa
-- last edit by Russ Atkinson,  2-Jun-81 21:47:49

DIRECTORY
  IOStream USING [Handle],
  Rope USING [Ref];
  
PPRopeFile: DEFINITIONS
  = BEGIN
  
  Int: TYPE = LONG INTEGER;
  
  RopeRef: TYPE = Rope.Ref;
  
  Handle: TYPE = REF RopeFileRep;
  
  RopeFileRep: TYPE;
     
  Create: PROC [file: IOStream.Handle,
                bufSize: NAT ← 1024, buffers: NAT ← 4,
		useMap: BOOLEAN ← TRUE]
               RETURNS [handle: Handle, rope: RopeRef];
    
  Destroy: PROC [handle: Handle];

  GetFile: PROC [handle: Handle] RETURNS [IOStream.Handle];
  
  END.