IntCodeEnables.mesa
Copyright Ó 1989, 1991 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) July 16, 1989 12:10:14 pm PDT
DIRECTORY
IntCodeDefs USING [Label, LabelNode, Node, Var];
IntCodeEnables: CEDAR DEFINITIONS = BEGIN
OPEN IntCodeDefs;
Types
GenTemp: TYPE = PROC [parent: Label, bits: INT] RETURNS [Var];
GenLabel: TYPE = PROC [node: Node] RETURNS [LabelNode];
Procedures
RewriteEnables: PROC
[node: Node, genTemp: GenTemp, genLabel: GenLabel]
RETURNS [Node];
END.