-- NoopMethods4Impl.mesa -- Copyright Ó 1987 by Xerox Corporation. All rights reserved. -- Generated by hederman.pa at August 17, 1987 4:47:13 pm PDT -- using ThreeCasabaFour [1.2] of June 1, 1987 6:00:00 pm PDT DIRECTORY SaffronAG4Def, ThreeC4Support, SaffronATDef; NoopMethods4Impl: CEDAR PROGRAM IMPORTS ThreeC4Support EXPORTS SaffronAG4Def= BEGIN OPEN SaffronAG4Def, ThreeC4Support, SaffronATDef; OptStatementabsentProdfoo: PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] = BEGIN tree: OptStatementNode_ NARROW[ref]; BEGIN ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length]; temp0 _ 0; END END; OptStatementpresentProdfoo: PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] = BEGIN tree: OptStatementNode_ NARROW[ref]; BEGIN ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length]; treeData: OptStatementpresentProdData _ NARROW[tree.data]; temp0 _ 0; END END; SelectStmtListemptyProdfoo: PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] = BEGIN tree: SelectStmtListNode_ NARROW[ref]; BEGIN ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length]; temp0 _ 0; END END; SelectStmtListmoreProdfoo: PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] = BEGIN tree: SelectStmtListNode_ NARROW[ref]; BEGIN ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length]; treeData: SelectStmtListmoreProdData _ NARROW[tree.data]; temp0 _ 0; END END; SelectStmtItemProdfoo: PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] = BEGIN tree: SelectStmtItemNode_ NARROW[ref]; BEGIN ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length]; treeData: SelectStmtItemProdData _ NARROW[tree.data]; temp0 _ 0; END END; END..