-- 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.