DIRECTORY Symbols USING [HTIndex], SymbolSegment USING [constType], Table USING [Selector]; PackageSymbols: DEFINITIONS = { MaxEntries: CARDINAL = NAT15.LAST; WordIndex: TYPE = CARD; ConstRecord: TYPE = MACHINE DEPENDENT RECORD [ offset: WordIndex, length: CARD]; ConstIndex: TYPE = CARD; constType: Table.Selector = SymbolSegment.constType; OuterPackRecord: TYPE = MACHINE DEPENDENT RECORD [ hti: Symbols.HTIndex, placed, attr1, attr2: BOOL ¬ FALSE, fill: [0..8*1024) ¬ 0, length: CARD16, firstSon: IPIndex, resident: BOOL, entryIndex: ValidIPIndex]; OPIndex: TYPE = CARDINAL [0..MaxEntries]; OPNull: OPIndex = OPIndex.LAST; InnerPackRecord: TYPE = MACHINE DEPENDENT RECORD [ length: CARD16, lastSon: BOOL, entryIndex: ValidIPIndex]; ValidIPIndex: TYPE = NAT15; IPIndex: TYPE = CARD16; IPNull: IPIndex = IPIndex.LAST; }. X PackageSymbols.mesa Copyright Σ 1985, 1986, 1987, 1988, 1989, 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) November 20, 1989 2:08:41 pm PST constant table declarations body data for outer callable bodies body data for inner callable bodies Κ!–(cedarcode) style•NewlineDelimiter ™headšœ™Icodešœ ΟeœO™ZLšΟy™Lšž*™*L™4—˜šΟk ˜ LšœŸœ ˜LšœŸœ ˜ LšœŸœ ˜——šΟnœŸ œ˜L˜Lš  œŸœŸœŸœ˜"L˜—Lšœ™˜Lšœ ŸœŸœ˜L˜š œ ŸœŸœŸ œŸœ˜.L˜LšœŸœ˜L˜—Lšœ ŸœŸœ˜L˜L˜4L˜—Lšœ#™#˜š œŸœŸœŸ œŸœ˜2L˜LšœŸœŸœ˜#L˜LšœŸœ˜L˜Lšœ Ÿœ˜Lšœ˜L˜—Lšœ ŸœŸœ˜)Lš œŸœ˜ L˜—Lšœ#™#˜š œŸœŸœŸ œŸœ˜2LšœŸœ˜Lšœ Ÿœ˜Lšœ˜L˜—LšœŸœŸœ˜šœ ŸœŸœ˜Lš œŸœ˜—L˜Lšœ˜˜L˜———…—HΑ