<> <> DIRECTORY Rope, TiogaNode; CreateNode: CEDAR DEFINITIONS = BEGIN fileFormatError: ERROR; -- raised for all format faults noBranchParseInfo: ERROR; -- raised when client does not supply BranchInfo SpanInfo: TYPE = REF SpanInfoRec; SpanInfoRec: TYPE = RECORD [ charsStart, charsLen, ctrlStart, ctrlLen: TiogaNode.Offset, externalRepRope: Rope.ROPE]; CreateInternalRep: PROC [br: TiogaNode.RefBranchNode] ; <> CreateFromInfo: PUBLIC PROC [rope: Rope.ROPE, textStart, textLen, controlStart, controlLen: INT] RETURNS [node: TiogaNode.Ref]; END.