DesiredPackageSymbols.mesa
Copyright Ó 1985, 1986, 1987, 1988, 1991 by Xerox Corporation. All rights reserved.
Sweet, May 12, 1980 3:21 PM
Satterthwaite, June 3, 1986 3:03:50 pm PDT
Russ Atkinson (RRA) March 1, 1988 6:18:58 pm PST
JKF December 29, 1989 1:58:26 pm PST
DIRECTORY
Symbols USING [BTIndex, HTIndex, ProcClass];
DesiredPackageSymbols: DEFINITIONS = {
body data for outer callable bodies
OuterPackRecord: TYPE = RECORD [
hti: Symbols.HTIndex,
bti: Symbols.BTIndex,
firstSon: IPIndex,
class: Symbols.ProcClass
];
OPIndex: TYPE = CARDINAL;
OPNull: OPIndex = OPIndex.LAST;
OPMain: OPIndex = OPIndex.FIRST;
body data for inner callable bodies
InnerPackRecord: TYPE = RECORD [
hti: Symbols.HTIndex,
bti: Symbols.BTIndex,
lastSon: BOOL,
class: Symbols.ProcClass
];
IPIndex: TYPE = CARD;
IPNull: IPIndex = IPIndex.LAST;
}.