; Overlay description for building PAS compiler. .PSECT WTTDAT, D, GBL ; Force WTTDAT into root .PSECT $99999 RO,D,GBL,OVR .NAME ROOT .ROOT ROOT-R-*(I1,I2,I3,C),$99999 R: .FCTR R1-R2-R3-R4-R5-R6 R1: .FCTR WTTDAT-PAS/LB:.MAIN.:ERROR:RECURS:INSYMB R2: .FCTR PAS/LB:NEXTCH:SRCHSE:ENDOFL:ERRMES R3: .FCTR PASLIB/LB:P11RAR:PBOOL:EXPSET:DIVI:DIF4:EQUM:EQUM2 R4: .FCTR PASLIB/LB:P11CMR:P11GET:GEQ:GRT:INN:LEQ:LES:LESM R5: .FCTR PASLIB/LB:LESM2:MOVM:NEQ:EQU:UNI4:WRI:WROCT R6: .FCTR PASLIB/LB:RUNCHK:WRERRO:P11HEA R7: .FCTR PASLIB/LB:MULI ; NOTE: if the compiler source has not been compiled with $E+ (EIS) ; then module PASLIB/LB:MULI (factor R7) above must be referenced ; in factor R. .NAME INI1 I1: .FCTR INI1-PAS/LB:INIT1:INIT2:INIT3:P11SWI-PASLIB/LB .NAME INI2 I2: .FCTR INI2-PAS/LB:ENTERI:ENTERS-PASLIB/LB .NAME INI3 I3: .FCTR INI3-PAS/LB:ENTERI:OPTION:NEWPAG:OPENFI:WRITES:PROGRA-$30 $30: .FCTR PAS/LB:P11INI:P11WTT:NXTCHR:INCLUD-$40 $40: .FCTR PASLIB/LB:P11EXI:P11CLO:DATETM-PASLIB/LB .NAME COMPIL C: .FCTR COMPIL-BL-*(D,BD-*(NEW,STM1,STM2,STM3,EXP,SEL,CNS,CS)) CS: .FCTR CST-*(CS1,CS2,CS3) BL: .FCTR PAS/LB:SKIP:BODY:HEAPMA-PASLIB/LB .NAME DECL D: .FCTR DECL-PAS/LB:BLOCK:SIMPLE:ENTERI-PASLIB/LB-*(D1,D2) .NAME DECL1 D1: .FCTR DECL1-PAS/LB:LABELD:CONSTD:TYPEDE:VARDEC-PASLIB/LB .NAME DECL2 D2: .FCTR DECL2-PAS/LB:PROCED:PFHEAD:COMPST:PARAMT:EXTERN-PASLIB/LB .NAME BODYDF BD: .FCTR BODYDF-BD1-BD2-BD3-BD4-BD5-BD6 BD1: .FCTR PAS/LB:STATEM:EXPRES:CALL:MULTIP:WRITOF:GENUJP BD2: .FCTR PAS/LB:ADDTOT:DELPRE:GENBR:GENCON:GENFJP:GENSUB BD3: .FCTR PAS/LB:GEN1:GEN2:GLOBAL:INCCIX:INSERT:LDO:LINENO BD4: .FCTR PAS/LB:LOAD:LOD:MOVEFR:MOVETO:PSECTD:PUTGR5:PUTGSD BD5: .FCTR PAS/LB:PUTRLD:RAD50:RAD50C:WRITOB ; Add :WRITER to above line for X+ compile BD6: .FCTR PAS/LB:SELECT:LARGES:COMPOU:LOADAD-PASLIB/LB .NAME COPYTR NEW: .FCTR COPYTR-PAS/LB:COPYTR-PASLIB/LB-*(NEW1,NEW2) .NAME COPYDB NEW2: .FCTR COPYDB-PAS/LB:WRTREC-PASLIB/LB .NAME MODENT NEW1: .FCTR MODENT-PAS/LB:STARTO-PASLIB/LB .NAME STMNT1 STM1: .FCTR STMNT1-PAS/LB:GOTOST:WITHST-PASLIB/LB .NAME STMNT2 STM2: .FCTR STMNT2-PAS/LB:CASEST:IFSTAT-$80 $80: .FCTR PAS/LB:REPEAT:WHILES:LOOPST-PASLIB/LB .NAME STMNT3 STM3: .FCTR STMNT3-PAS/LB:ASSIGN:FORSTA:STORE-PASLIB/LB .NAME EXPR EXP: .FCTR EXPR-PAS/LB:LOADST-PASLIB/LB .NAME SELE SEL: .FCTR SELE-PAS/LB:DOSELE-PASLIB/LB .NAME CALLN CNS: .FCTR CALLN-PAS/LB:CALLNS:BASE-PASLIB/LB .NAME CALLS CST: .FCTR CALLS-PAS/LB:VARIAB:GETFIL:CALLST-PASLIB/LB .NAME CALLS1 CS1: .FCTR CALLS1-PAS/LB:PUSHDE:READRE:PACK:UNPACK-$90 $90: .FCTR PASLIB/LB .NAME CALLS2 CS2: .FCTR CALLS2-PAS/LB:NEW1:ABS:SQR:TRUNC:ARITHM:ROUND-$95 $95: .FCTR PASLIB/LB .NAME CALLS3 CS3: .FCTR CALLS3-PAS/LB:WRITEW-$100 $100: .FCTR PAS/LB:ODD:ORD:CHR:PREDSU:EOFEOL:BREAKL:FORMFE-$110 $110: .FCTR PAS/LB:DATETI:HALT:RUNTIM:MARKRE:SPLITR:SSIZE:TWOPOW-$120 $120: .FCTR PASLIB/LB .END