Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/subsm.ctl
There are no other files named subsm.ctl in the archive.
!**** SUBSM.CTL JUN-79
!***** ASSEMBLE PROGRAM
MAC::@R MACRO
*SUBSM@
@IF (ERROR) @GOTO BLO
LNK::@RUN DLINK
*SUBSM.SAV/SAV=SUBSM/NOSYM/NOINIT/GO
@IF (ERROR) @GOTO BLO
CRF::@R CREF
*DSK:SUBSM.LST=SUBSM/O
@IF (ERROR) @GOTO BLO
DC1::@RUN DECDOC.SAV
*SUBSM
@IF (ERROR) @GOTO BLO
DC2::@RUN DECDOC.SAV
*SUBSM/S=SUBSM.TXT,SUBSM.HST,SUBSM.DOC,SUBSM.LST
@IF (ERROR) @GOTO BLO
DEL::@DEL SUBSM.LST,SUBSM.DOC,SUBSM.REL
@IF (ERROR) @GOTO BLO
@GOTO LOG
!
BLO::@R PIP
*SUBSM.BLO=NUL:FOO
LOG::