-- NoopMethods5Impl.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
	SaffronAG5Def,
	ThreeC4Support,
	SaffronATDef;

NoopMethods5Impl: CEDAR PROGRAM IMPORTS ThreeC4Support EXPORTS SaffronAG5Def= 
BEGIN
OPEN SaffronAG5Def, ThreeC4Support, SaffronATDef;
EntryentryProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	EntryNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

EntryinternalProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	EntryNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

EntryemptyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	EntryNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

ExitListemptyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ExitListNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

ExitListmoreProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ExitListNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ExitListmoreProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ExitItemProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ExitItemNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ExitItemProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ForClauseassignationProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ForClauseNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ForClauseassignationProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ForClauseiterationProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ForClauseNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ForClauseiterationProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ForClauserepetitionProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ForClauseNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ForClauserepetitionProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ForClauseemptyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ForClauseNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

ControlIdnewProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ControlIdNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ControlIdnewProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

ControlIdoldProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	ControlIdNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	ControlIdoldProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

DecreasingyesProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DecreasingNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

DecreasingnoProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DecreasingNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

DoTestuntilProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DoTestNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	DoTestuntilProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

DoTestwhileProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DoTestNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	DoTestwhileProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

DoTestemptyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DoTestNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

DoExitProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	DoExitNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	DoExitProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

OptArgsexplistProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	OptArgsNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	OptArgsexplistProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

OptArgsexpProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	OptArgsNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	OptArgsexpProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

OptArgsemptyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	OptArgsNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransfersignalProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransfererrorProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferreturnwitherrorProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferstartProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferrestartProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferjoinProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransfernotifyProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferbroadcastProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransfertransferwithProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

TransferreturnwithProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	TransferNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

FreeplainProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	FreeNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
temp0 _ 0;
END
END;

FreezonedProdfoo:	PUBLIC PROC[ref: REF ANY] RETURNS[temp0: INT] =
BEGIN
tree:	FreeNode_ NARROW[ref];
BEGIN
ENABLE ThreeC4Support.GetSourceInfo => RESUME[tree.position, tree.length];
treeData:	FreezonedProdData _ NARROW[tree.data];
temp0 _ 0;
END
END;

END..