Service Manuals, User Guides, Schematic Diagrams or docs for : xerox mesa 4.0_1978 listing Mesa_4_Compiler Symtab.mesa_Sep78

<< Back | Home

Most service manuals and schematics are PDF files, so You will need Adobre Acrobat Reader to view : Acrobat Download Some of the files are DjVu format. Readers and resources available here : DjVu Resources
For the compressed files, most common are zip and rar. Please, extract files with Your favorite compression software ( WinZip, WinRAR ... ) before viewing. If a document has multiple parts, You should download all, before extracting.
Good luck. Repair on Your own risk. Make sure You know what You are doing.



Image preview - the first page of the document



>> Download Symtab.mesa_Sep78 documenatation <<

Text preview - extract from the document

Symtab.mesa                     2-Sep-78 12:59:59                                Page   1



-- file SymTab.Mesa
-- last modified by Johnsson, April 7, 1978     8:06 AM
DIRECTORY
  AltoDefs: FROM "altodefs",
  ControlDefs: FROM "controldefs",
  StringDefs: FROM "stringdefs",
  SymbolTable: FROM "symboltable",
  SymbolTableDefs: FROM "symboltabledefs",
  SymDefs: FROM "symdefs",
  SymSegDefs: FROM "symsegdefs",
  SymTabDefs: FROM "symtabdefs",
  TableDefs: FROM "tabledefs";
SymTab: PROGRAM
    IMPORTS
        StringDefs, TableDefs, SymTabDefs,
        own: SymbolTable
    EXPORTS SymTabDefs SHARES SymDefs =
 PUBLIC
  BEGIN
  OPEN TableDefs, SymTabDefs, SymDefs;
  SubString: TYPE   = StringDefs.SubString;
  StaticNestError: SIGNAL   = CODE;
-- tables defining the current symbol table
  hashVector: PRIVATE ARRAY HVIndex OF HTIndex;
  ht: PRIVATE DESCRIPTOR FOR ARRAY --HTIndex-- OF HTRecord;
  hashVec: PRIVATE DESCRIPTOR FOR ARRAY OF HTIndex = -- DESCRIPTOR[hashVector]
    DESCRIPTOR[BASE[hashVector], HVLength];      -- 77
  htb: PRIVATE TableBase;                   hash table
  5sb: PRIVATE STRING;                      id string
  5eb: PRIVATE TableBase;                   se table
  ctxb: PRIVATE TableBase;                  context table
  mdb: PRIVATE TableBase;                   module directory base
  bb: PRIVATE TableBase;                    body table
  UpdateBases: PRIVATE TableNotifier =
    BEGIN -- called whenever the main symbol table is repacked
    own.hashVec ~ hashVec;
    htb ~ base[httype];
    own.ssb ~ ssb ~ LOOPHOLE[base[sstype], STRING];
    own.ht ~ ht ~ DESCRIPTOR[htb, LENGTH[ht]];
    own.seb ~ seb ~ base[setype];
    own.ctxb ~ ctxb ~ base[ctxtype]; own.mdb ~ mdb ~ base[mdtype]:
    own.bb ~ bb ~ base[bodytype];
    own.tb ~ base[SymSegDefs.treetype];
    own. ltb ~ base[SymSegDeFs.lttype];
    own.extb ~ base[SymSegDefs.exttype];
    own.notifier[own]:
    RETURN
    END;
  AllocateHash: PRIVATE PROCEDURE RETURNS [HTIndex] 

◦ Jabse Service Manual Search 2026 ◦ Jabse Pravopis ◦ onTap.bg ◦ Other service manual resources online : Fixya ◦ eServiceinfo