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



Back to : Pass1.mesa_Sep78.pdf | Home

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



-- file Passl.Mesa
-- last modified by Satterthwaite. July 16. 1978 9:47 AM
DIRECTORY
AltoDefs: FROM "altodefs" USING [charlength. maxword. wordlength].
ComData: FROM "comdata"
USING [
idANY. idBOOLEAN. idCARDINAL. idCHARACTER. idFALSE.
idINTEGER. idLOCK. idREAL. idSTRING. idTRUE. idUNWIND.
nErrors. outerCtx. seAnon. sourceStream. tCO. tCl.
typeBOOLEAN. typeCHARACTER. typeCONDITION. typeINTEGER. typeLOCK.
typeREAL. typeSTRING].
CompilerDefs: FROM "compilerdefs" USING [MakeSwappable].
ControlDefs: FROM "controldefs" USING [Control Link. EPRange. GFTNull].
LitDefs: FROM "litdefs" USING [FindLiteral].
P1Defs: FROM "pldefs" USING [Parse. Scanner. Parser. PasslT].
SegmentDefs: FROM "segmentdefs"
USING [FileSegmentHandle. FileSegmentAddress. SwapIn. SwapOut. Unlock].
StringDefs: FROM "stringdefs" USING [SubStringDescriptor].
SymDefs: FROM "symdefs"
USING [
ctxtype. setype.
BitAddress. SERecord.
HTIndex. SEIndex. ISEIndex. CSEIndex. recordCSEIndex. CTXIndex.
codeANY. codeINTEGER. codeCHARACTER. typeANY. typeTYPE.
HTNull. recordCSENull. lZ].
SymTabDefs: FROM "symtabdefs"
USING [
EnterString. fillctxse. makectxse, makenewctx. makenonctxse.
makeSEChain. NextSe. resetctxlist, UnderType].
TableDefs: FROM "tabledefs"
USING [TableBase. TableNotifier, AddNotify. DropNotify].
TreeDefs: FROM "treedefs" USING [empty];
Passl: PROGRAM
IMPORTS
CompilerDefs. LitDefs. P1Defs. SegmentDefs. SymTabDefs. TableDefs.
dataPtr: ComData
EXPORTS CompilerDefs, P1Defs