-- CheckNode.mesa

-- written by Bill Paxton, April 1981

-- last edit by Bill Paxton, December 22, 1981 1:58 pm

DIRECTORY

TextNode,

RopeEdit,

TextLooks;

CheckNode: CEDAR DEFINITIONS =

BEGIN

Failed: ERROR;

Check: PROC [node: TextNode.Ref];

CheckTextNode: PROC [text: TextNode.RefTextNode]; -- does CheckRope & CheckRuns

CheckRope: PROC [rope: RopeEdit.ROPE];

CheckRuns: PROC [runs: TextLooks.Runs];

Start: PROC; -- for initialization only

END.