Text preview for : Pass3.mesa_Sep78.pdf part of xerox Pass3.mesa Sep78 xerox mesa 4.0_1978 listing Mesa_4_Compiler Pass3.mesa_Sep78.pdf



Back to : Pass3.mesa_Sep78.pdf | Home

Pass3.Mesa 2-Sep-78 12:59:59 Page 1


-- file Pass3.Mesa
-- last modified by Satterthwaite, May 18, lq;d 10:23 AM
DIRECTORY
ComData: FROM "comdata"
USING [
bodyRoot, importCtx, moduleCtx, monitored, outerCtx, stopping,
textIndex, xref],
CompilerDefs: FROM "compilerdefs" USING [MakeSwappable],
CopierDefs: FROM "copierdefs"
USING [
CopierInit, CopierReset, FileProblem, FileVersionMix, TableRelocated],
ErrorDefs: FROM "errordefs" USING [errorhti],
P3Defs: FROM "p3defs"
USING [
Pass3D, Pass3I, Pass3S, Pass3Xa, Pass3Xb,
DeclNotify, IdNotify, StmtNotify, ExpANotify, ExpBNotify,
Explnit, Idlnit, IdFinish,
BodyList, CheckDirectorylds, CloseBase, Declltem,
Directoryltem, DirectoryScan, Exportld, Importltem,
OpenBase, PopCtx, PushCtx, Sharing],
SymDefs: FROM "symdefs" USING [CSElndex, recordCSEIndex, HTNull],
TableDefs: FROM "tabledefs"
USING [TableBase, TableNotifier, AddNotify, DropNotify],
TreeDefs: FROM "treedefs"
USING [treetype,
TreeLink, TreeIndex, TreeMap, TreeScan, nullTreeIndex,
GetNode, reversescanlist, scanlist, updatelist]:
Pass3: PROGRAM
IMPORTS
CompilerDefs, CopierDefs, ErrorDefs, P3Defs, TableDefs, TreeDefs,
dataPtr: ComData
EXPORTS CompilerDefs =
PUBLIC
BEGIN
OPEN TreeDefs:
tb: PRIVATE TableDefs.TableBase: -- tree base (local copy)
Pass3Notify: PRIVATE TableDefs.TableNotifier