<<-- 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.