<> <> <> DIRECTORY FS USING [OpenFile], IO USING [STREAM], Rope USING [ROPE]; RopeFile: CEDAR DEFINITIONS = BEGIN OPEN IO, Rope; Create: PROC [name: ROPE, start: INT _ 0, len: INT _ LAST[INT], bufSize: INT _ 512, buffers: NAT _ 4, raw: BOOL _ TRUE] RETURNS [rope: ROPE]; <> FromStream: PROC [stream: STREAM, start: INT _ 0, len: INT _ LAST[INT], bufSize: INT _ 512, buffers: NAT _ 4] RETURNS [rope: ROPE]; <> SubstrCreate: PROC [name: ROPE, start: INT _ 0, len: INT _ LAST[INT]] RETURNS [rope: ROPE]; <> SimpleCreate: PROC [name: ROPE] RETURNS [rope: ROPE]; <> FileFromRope: PROC [rope: ROPE] RETURNS [FS.OpenFile]; <> END. <> <> <<>>