; FILE = RATFOR.ODL
; PCN #85, CREATE OVERLAY VERSION OF RATFOR FOR RSX
;
; IF SPAWNIT IS DEFINED...	ADD SPAWNF AND SPAWN TO UTILITY OVERLAY
; IF ASCII IS NOT DEFINED...	ADD INMAP TO CODE OVERLAY
;				ADD OUTMAP AND .DATA. TO ROOT 
; IF REALCODE IS DEFINED	ADD DAYS TO UTILITY
; CLOOK MUST BE IN ROOT FOR /RE SWITCH TO WORK
; THIS ODL ASSUMES THAT THE FTN OTS LIBRARY IS NOT IN SYSLIB.
; IF YOU ARE USING F4P, WITH A SEPERATE LIBRARY, CHANGE 'FOROTS' TO 'F4POTS'.
; IF THE FTN LIBRARY IS IN SYSLIB, DELETE THE 'FOROTS' REFERENCE IN FCTR 'LIB'
;    AND CHANGE THE REFERENCE IN ROOT4 TO 'SYSLIB'.
; NOTE: TAKE CARE THAT ALL NAMED COMMON BLOCKS GET FORCED INTO ROOT SEGMENT.
;
;******** ROOT SEGMENT ******************
;
	.ROOT	ROOT1-ROOT2-ROOT3-ROOT4-ROOT5-PSEC-LIB-*(CODE,UTIL)
;
ROOT1:	.FCTR	XX0:RATFOR/LB:.MAIN.
ROOT2:	.FCTR	XX0:RATFOR/LB:RATLST:PUTLIN:SYNERR:OUTDON:ICSIE
ROOT3:	.FCTR	XX0:RATFOR/LB:ERROR:LABGEN:OPNIN:DOINDX
ROOT4:	.FCTR	LB0:[1,1]FOROTS/LB:$SHORT
ROOT5:	.FCTR	XX0:STRLIB/LB:INDEX:SCTOI:STRGET:TYPE:SFIND
;ROOT6:	.FCTR	XX0:RATFOR/LB:OUTMAP:.DATA.
;
;** MAIN FTN CODE GENERATING SEGMENT ****
;
CODE:	.FCTR	CODE0-LIB
CODE0:	.FCTR	CODE1-CODE2-CODE3-CODE4-CODE5-CODE6-CODE7-CODE8
;
CODE1:	.FCTR	XX0:RATFOR/LB:PARSE:BRKNXT:DOCODE:ELSEIF:ENDCOD:FORCOD
CODE2:	.FCTR	XX0:RATFOR/LB:IFCODE:LABELC:LEX:OTHERC:REPCOD:GETNAM
CODE3:	.FCTR	XX0:RATFOR/LB:PBSTR:PUTBAK:UNTILS:UNSTAK:WHILEC:GTFUNC
CODE4:	.FCTR	XX0:RATFOR/LB:BALPAR:EATUP:LRPAR:PRTLIN:FORS:IFGO
CODE5:	.FCTR	XX0:RATFOR/LB:OUTCON:OUTNUM:OUTCH:OUTSTR:OUTTAB:OUTGO:OUTIF
CODE6:	.FCTR	XX0:RATFOR/LB:ADDDEF:GETDEF:GTOK:NGETCH:GETLIN
CODE7:	.FCTR	XX0:RATFOR/LB:RELATE:MATH:TOKDEF:LOOKFR:INSTAL:RETCOD
CODE8:	.FCTR	XX0:RATFOR/LB:DEFTOK:DEFMAC:ENDSTR:IFDEFC:STRNGC:OPENI
;CODE9:	.FCTR	XX0:RATFOR/LB:INMAP
;
;******** UTILITY SEGMENT ****************
;
	.NAME	UTLITY
UTIL:	.FCTR	UTLITY-UTIL1-UTIL2-CSI-LIB
;
UTIL1:	.FCTR	XX0:RATFOR/LB:RATHLP:DEFLST:DUMPIT:FILFIX:HEADR:OPNOUT
UTIL2:	.FCTR	XX0:RATFOR/LB:DMPIDX:RATGO
;UTIL3:	.FCTR	XX0:RATFOR/LB:SPAWNF-LB0:[1,1]SYSLIB/LB:SPAWN
;UTIL4:	.FCTR	XX0:RATFOR/LB:DAYS
;
CSI:	.FCTR	XX0:RATFOR/LB:ICSI:ICSIN:ICSIS:ICSIL
LIB:	.FCTR	XX0:STRLIB/LB-LB0:[1,1]FOROTS/LB
;
;*********  TO FORCE EXTRA  PSECTS INTO ROOT **********
;
PSEC:	.FCTR	CDEFIO-CFOR-CFUNC-CLOOK-CPRTLN-CSTR-CUCLC
	.PSECT CDEFIO,RW,GBL,REL,OVR,D
	.PSECT CFOR,RW,GBL,REL,OVR,D
	.PSECT CFUNC,RW,GBL,REL,OVR,D
	.PSECT CLOOK,RW,GBL,REL,OVR,D
	.PSECT CPRTLN,RW,GBL,REL,OVR,D
	.PSECT CSTR,RW,GBL,REL,OVR,D
	.PSECT CUCLC,RW,GBL,REL,OVR,D
;
	.END