CreateNode.mesa; written by Bill Paxton, May 1981
edited by Paxton. August 19, 1983 2:23 pm
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] ;
creates a valid internal representation
CreateFromInfo:
PUBLIC
PROC [rope: Rope
.ROPE, textStart, textLen, controlStart, controlLen:
INT]
RETURNS [node: TiogaNode.Ref];
END.