SymbolTable.mesa_Oct77.pdf | | symboltable.mesa 24-0CT-77 18:44:36 Page 1
-- file SymbolTable.Mesa
-- last modified by Barbara, October 3, 1977 11:24 AM
DIRECTORY
AltoDers: FROM "altodefs",
ControlDefs: FROM "controldefs",
InlineDefs: FROM "inlinedefs",
StringDefs: FROM "stringdefs",
TableDefs: FROM "tabledefs",
SymTabDefs: FROM "symtabders",
SymDefs: FROM "symdefs";
SymbolTable: PROGRAM
IMPORTS StringDefs
EXPORTS SymTabDefs SHARES SymDefs
PUBLIC
BEGIN
OPEN SymDefs;
-- tables defining the current symbol table
hashvec: DESCRIPTOR FOR ARRAY OF HTIndex; -- hash index
ht: DESCRIPTOR FOR ARRAY --HTIndex-- OF HTRecord; -- hash table
ssb: STRING; id string
seb: TableDefs.TableBase; se table
ctxb: TableDefs.TableBase; context table
mdb: TableDefs.TableBase; module directory base
bb: TableDefs.TableBase; body table
stHandle: POINTER T |