DIRECTORY PFS USING [PATH, UniqueID, nullUniqueID, OpenFile], IO USING [STREAM], Rope USING [ROPE], Tioga USING [Node]; TiogaIO: CEDAR DEFINITIONS ~ BEGIN STREAM: TYPE ~ IO.STREAM; ROPE: TYPE ~ Rope.ROPE; Node: TYPE ~ Tioga.Node; Error: ERROR; GetDoc: PROC [s1, s2, s3: STREAM] RETURNS [Node]; PutDoc: PROC [s1, s2, s3: STREAM, root: Node]; GetDocRope: PROC [s1, s2, s3: STREAM] RETURNS [ROPE]; RopeFromSimpleDoc: PROC [Node] RETURNS [ROPE]; SimpleDocFromRope: PROC [ROPE] RETURNS [Node]; FromRope: PROC [rope: ROPE] RETURNS [Node]; ToStream: PROC [s: STREAM, root: Node] RETURNS [dataLen: INT]; ToRope: PROC [root: Node] RETURNS [ROPE]; Pair: TYPE ~ RECORD [contents: ROPE, formatting: ROPE]; FromPair: PROC [pair: Pair] RETURNS [Node]; ToPair: PROC [root: Node] RETURNS [Pair]; FromFile: PROC [fileName: PFS.PATH, wantedUniqueID: PFS.UniqueID ฌ PFS.nullUniqueID] RETURNS [fullFName: PFS.PATH, uniqueID: PFS.UniqueID, root: Node]; ToFile: PROC [fileName: PFS.PATH, root: Node] RETURNS [fullFName: PFS.PATH, uniqueID: PFS.UniqueID, dataLen: INT]; FromOpenFile: PROC [file: PFS.OpenFile] RETURNS [fullFName: PFS.PATH, uniqueID: PFS.UniqueID, root: Node]; ToOpenFile: PROC [file: PFS.OpenFile, root: Node] RETURNS [fullFName: PFS.PATH, uniqueID: PFS.UniqueID, dataLen: INT]; WritePlainToStream: PROC [s: STREAM, root: Node, restoreDashes: BOOL ฌ FALSE]; WritePlainToRope: PROC [root: Node, restoreDashes: BOOL ฌ FALSE] RETURNS [ROPE]; END. < TiogaIO.mesa Copyright ำ 1985, 1986, 1988, 1991, 1992 by Xerox Corporation. All rights reserved. written by Bill Paxton, May 1981 last edit by Paxton. October 21, 1982 1:55 pm Russ Atkinson, July 22, 1983 10:24 am Willie-s, February 12, 1991 2:02 pm PST Doug Wyatt, October 22, 1991 6:29 pm PDT ส4–(cedarcode) style•NewlineDelimiter ™codešœ ™ Kšœ ฯeœI™TKšฯy ™ Kšž-™-Kšœ%™%K™'K™(—K˜šฯk ˜ KšŸœŸœŸœ$˜3KšŸœŸœŸœ˜KšœŸœŸœ˜KšœŸœ˜—K˜KšฯnœŸœŸ ˜KšœŸ˜K˜KšŸœŸœŸœŸœ˜KšŸœŸœŸœ˜šœŸœ˜K˜—š œŸœ˜ K˜—š œŸœŸœŸœ˜1K™—š œŸœŸœ˜.K™—š   œŸœŸœŸœŸœ˜5K™—š œŸœŸœŸœ˜.K™—š œŸœŸœŸœ˜.K™—š œŸœŸœŸœ˜+K™—š  œŸœŸœŸœ Ÿœ˜>K™—š œŸœŸœŸœ˜)K™—K˜š œŸœŸœ ŸœŸœ˜7K˜—š œŸœŸœ˜+K˜—š œŸœŸœ˜)K™—K˜š œŸœ ŸœŸœŸœ ŸœŸœ ŸœŸœ Ÿœ˜—K˜—š œŸœ ŸœŸœŸœ ŸœŸœ ŸœŸœ˜sK™—K˜š  œŸœŸœ Ÿœ ŸœŸœ Ÿœ˜kK˜—š  œŸœŸœŸœ ŸœŸœ ŸœŸœ˜wK™—K˜š  œŸœŸœŸœŸœ˜NK™—š  œŸœŸœŸœŸœŸœ˜PK™—KšŸœ˜—…—ฎ