ExampleATDef.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Generated by BJackson.pa at April 22, 1987 2:16:55 am PDT
using ThreeCasabaFour [1.1] of April 14, 1987 6:34:07 pm PDT
DIRECTORY
ExampleTreeDef;
ExampleATDef: CEDAR DEFINITIONS =
BEGIN
OPEN ExampleTreeDef;
Expression
ExpressionNode: TYPE = REF ExpressionNodeBody;
ExpressionNodeBody:
TYPE =
RECORD[
position: INT, length: INT,
procs: ExpressionNodeProcs,
data: REF ANY];
ExpressionNodeProcs: TYPE = REF ExpressionNodeProcsBody;
ExpressionNodeProcsBody: TYPE = RECORD[
Evaluate: EvaluateProcType];
END..