Copyright © 1985 by Xerox Corporation. All rights reserved.

Russ Atkinson, March 6, 1985 11:09:11 pm PST

Satterthwaite, November 26, 1985 1:14:55 pm PST

Sweet May 30, 1986 1:51:42 pm PDT

CodeDefs: TYPE USING [StoreOptions],

IntCodeDefs: TYPE USING [Node, Var],

Symbols: TYPE USING [SEIndex],

Tree: TYPE USING [Link];

OPEN CodeDefs;

Node: TYPE = IntCodeDefs.Node;

Var: TYPE = IntCodeDefs.Var;

Allocate: PROC[zone: Tree.Link, type: Symbols.SEIndex, catch: Tree.Link, size: Node] RETURNS [Node];

FillCounted: PROC[space, source: Var, options: StoreOptions, type: Symbols.SEIndex] RETURNS [Node];

Free: PROC[var: Var, counted: BOOL, zone, catch: Tree.Link] RETURNS [Node];

GetSystemZone: PROC RETURNS [Node];

}.