DIRECTORY Atom USING [PropList], Rope USING [ROPE], Rosary USING [ROSARY], TextEdit USING [CharSetRun, LooksRun, PropListRun], TextLooks USING [Looks, Runs], TextNode USING [Ref], TiogaAccess USING [CharSet, TiogaChar]; TiogaAccessPrivate: CEDAR DEFINITIONS ~ BEGIN ROPE: TYPE ~ Rope.ROPE; ROSARY: TYPE ~ Rosary.ROSARY; CharSet: TYPE ~ TiogaAccess.CharSet; TiogaChar: TYPE ~ TiogaAccess.TiogaChar; ropePieces: NAT ~ 15; Reader: TYPE ~ REF ReaderRep; ReaderRep: TYPE ~ RECORD [ root: TextNode.Ref, textNode: TextNode.Ref, textNodeIndex: INT, format: ATOM, end: BOOLEAN, comment: BOOLEAN, nodeProps: Atom.PropList, level: INT, nodeLength: INT, textBuffer: REF TEXT, textStart, textEnd: INT, charSetRun: TextEdit.CharSetRun, looksRun: TextEdit.LooksRun, propListRun: TextEdit.PropListRun, startingOffsetFromOriginalRoot: INT, putback: LIST OF TiogaChar ]; Writer: TYPE ~ REF WriterRep; WriterRep: TYPE ~ RECORD [ root: TextNode.Ref, first: TextNode.Ref, last: TextNode.Ref, level: INT, lastLevel: INT, nodeSize: INT, ropes: ARRAY [0..ropePieces) OF ROPE, textBuf: REF TEXT, runs: TextLooks.Runs, newLooks: TextLooks.Looks, newLooksRepeat: INT, charSets: ROSARY, newCharSet: REF CharSet, newCharSetRepeat: INT, charProps: ROSARY, newCharProp: Atom.PropList, newCharPropRepeat: INT ]; END. TiogaAccessPrivate.mesa Copyright Σ 1985, 1986, 1988 by Xerox Corporation. All rights reserved. Russ Atkinson (RRA) July 2, 1985 11:06:55 am PDT Doug Wyatt, February 18, 1988 11:26:31 am PST Private types for TiogaAccess. The contents of the current node is represented by the concatenation of ropes in order by decreasing index, together with the contents of textBuf. The size of ropes[i] is either 0 or approximately textBufSize*2**i; building the rope this way yields a balanced rope without a lot of flattening. ΚΊ˜codešœ™KšœH™HK™0Kšœ-™-—K™K™K™šΟk ˜ Kšœœ ˜Kšœœœ˜Kšœœœ˜Kšœ œ%˜3Kšœ œ˜Kšœ œ˜Kšœ œ˜'—K˜KšΠblœœ ˜%Kšœ˜K˜Kšœœœ˜Kšœœ œ˜K˜Kšœ œ˜$Kšœ œ˜(K˜Kšœ œ˜K˜Jšœœœ ˜šœ œœ˜Jšœ˜Jšœ˜Jšœœ˜Jšœœ˜ Jšœœ˜ Jšœ œ˜Jšœ˜Jšœœ˜ Jšœ œ˜Jšœ œœ˜Jšœœ˜Jšœ ˜ J˜Jšœ"˜"Jšœ œ˜$Jšœ œœ ˜Jšœ˜J˜—Jšœœœ ˜šœ œœ˜Jšœ˜Jšœ˜Jšœ˜Jšœœ˜ Jšœ œ˜Jšœ œ˜Jšœœœœ˜%šœ œœ˜Jšœ¦™¦—Jšœ˜Jšœ˜Jšœœ˜Jšœ œ˜Jšœ œ ˜Jšœœ˜Jšœ œ˜J˜Jšœ˜Jšœ˜J˜—K˜Kšœ˜J˜—…— Ψ