<> <> <> <> DIRECTORY BasicTime, FS, Rope, IO, RopeReader; FileReader: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; Offset: TYPE = INT; InterDoc: SIGNAL [doc: ROPE]; -- raised by following procs <> Open: PROC [fileName: ROPE, start, len: Offset] RETURNS [control, comment, text: RopeReader.Ref, tiogaFile: BOOL, fh: FS.OpenFile, createDate: BasicTime.GMT]; OpenC: PROC [file: FS.OpenFile, start, len: Offset] RETURNS [control, comment, text: RopeReader.Ref, tiogaFile: BOOL, createDate: BasicTime.GMT]; FromRope: PROC [rope: ROPE, start, len: Offset] RETURNS [control, comment, text: RopeReader.Ref, tiogaFile: BOOL]; FromStream: PROC [stream: IO.STREAM, len: Offset] RETURNS [control, comment, text: RopeReader.Ref, tiogaFile: BOOL]; Start: PROC; -- for initialization only END.