[Indigo]<Rosemary>Rosemary2>PreRelease>Rosemary2.DF=>RoseConditions.Mesa
Last Edited by: Spreitzer, September 4, 1983 1:36 pm
DIRECTORY
RoseTypes, Trees;
RoseConditions: CEDAR DEFINITIONS =
BEGIN OPEN RoseTypes;
Condition: TYPE = Trees.TreeNode;
NodeTest: TYPE = REF NodeTestRep;
NodeTestRep:
TYPE =
RECORD [
node: Node,
nodeName: ROPE,
nodeFormat: Format,
cell: Cell,
testData: REF ANY ← NIL,
testProc: NodeTestProc ← NIL];
IncrementalCondition: TYPE = REF IncrementalConditionRep;
IncrementalConditionRep: TYPE;
test: Trees.NodeType;
PostOnCell: PROC [cell: Cell, condition: Condition];
UnPostOnCell: PROC [cell: Cell, condition: Condition];
PostIncrementally: PROC [cond: Condition] RETURNS [ic: IncrementalCondition];
UnPostIncrementally: PUBLIC PROC [ic: IncrementalCondition];
END.