perm filename EXPORT.DO[X,AIL]9 blob sn#268564 filedate 1977-03-15 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BATCH COMMANDS TO CREATE EXPORT SAIL↔
C00006 ENDMK
C⊗;
;BATCH COMMANDS TO CREATE EXPORT SAIL↔
;It might not be necessary to do all this cruft, unless either		↔
;(a) someone has deleted some of the files (DIR @FILES[X,AIL] should	↔
;    give no "FILE NOT FOUND" messages, or				↔
;(b) some change has been made to SAIL or its friends since the last	↔
;    time the export files were created (this is quite likely).		↔
ALIAS X,AIL↔

LOAD/SAV FAIL.SAV←NOSTAN+FAIL[CSP,SYS]	;export FAIL↔
SAV FAIL	;until MJC gets alternate processors with extensions working↔

;get files for runtime routines↔
RESOURCES	;should show at least 300 tracks left for DSK↔
COPY/Q SCISS.DMP[S,AIL],HEAD,ORDER,GOGOL,TRIGS,STRSER,IOSER,ARYSER,RECSER↔
COPY/Q NWORLD[S,AIL],LEPRUN,MESPRO,WRDGET$SPARES↔

;assemble library↔
RU SCISS↔
DEC↔
Y↔
↔
Y↔

;runtimes with symbols↔
COM/PROC DSK:FAIL RUNTIM=NOSTAN(LR)+HEAD+ORDER+GOGOL+TRIGS+STRSER+IOSER
+ARYSER+RECSER+NWORLD+LEPRUN+MESPRO+WRDGET+SPARES↔
DEL/Q SCISS.DMP,ORDER,GOGOL,TRIGS,STRSER,IOSER,ARYSER,RECSER↔
DEL/Q NWORLD,LEPRUN,MESPRO,WRDGET,SPARES↔


;get files for compiler, assemble and load debugging version↔
COPY/Q DB[S,AIL],HEAD,SAIL,PARSE,HEL,SYM,GEN,ARRAY,EXPRS,STATS,LEAP,TOTAL,PROCSS,COMSER↔
COM @THAT↔
DEL/Q DB,HEAD,SAIL,PARSE,HEL,PROD,SYM,GEN,ARRAY,EXPRS,STATS,LEAP,TOTAL,PROCSS,COMSER↔
R LOADER↔
/SSAIL,/LLIBSA8,/V≠
SAV SAIL↔


;procedure descriptors for BAIL predeclared runtimes↔
COPY/Q BPDAHD.FAI[S,AIL],BSM1HD.FAI↔

;;;;COMPILE/PROC RTRAN[S,AIL] RESTAB=PROD+FOO2↔
COMPILE/PROC DSK:FAIL BPDAHD+<BAICLC,BAIIO1,BAIIO2,BAIMSC,BAIPRC>↔
EXECUTE/PROC DSK:FAIL BAISM1=BSM1HD+BAISM1↔
DEL/Q BPDAHD.FAI,BSM1HD.FAI,BAISM1.REL↔
DEL/Q FAIL.DMP↔


;export BAIL↔
RU SAIL↔
BAIL←BAIL↔
λ

ALIAS↔
;Now do this:↔
;COPY MTA:←@FILES[X,AIL]↔
;good luck!