FOO.IN[S,AIL] - www.SailDart.org

perm filename FOO.IN[S,AIL] blob sn#183414 filedate 1975-10-25 generic text, type T, neo UTF8

;PTYJOB input text to make two-segment compiler supporting extended compilation
ALIAS S,AIL		;get onto the right area
COPY/Q SYS:SAIL.DMO←SYS:SAIL.DMP	;backup copies
COPY/Q SYS:SAIL.SEF←SYS:SAIL.SEG
COMPILE @ITRENC		;assemble the compiler
R LINK			;load it
=SAIL/L,XTCLOR,SYS:HLBSA8/SEARCH,SYS:RAID/G
ALIAS 1,3		;put the results on the system area
START			;copy .JBVER to 400004, write protect, dumpout upper
SAVE SAIL		;lower
ALIAS