Trailing-Edge
-
PDP-10 Archives
-
decuslib20-07
-
decus/20-0161/file.ctl
There are no other files named file.ctl in the archive.
! Control file to build FILE.EXE for inhouse release
!
!
!First make sure we know what is going into the product
@VD *.*,SYS:MACRO.EXE,SYS:LINK.EXE,SYS:CREF.EXE,
@CHECK SEQ
@
!
! Now go build the .REL files
!
@MACRO
*NUL:,DSK:PARUNV.CRF/C=PARUNV
*PARSE.REL,PARSE.CRF/C=PARSE
*FILE.REL,FILE.CRF/C=FILE
@IF (ERROR) @GOTO PUNT
!
! Build a listing file
!
@APPEND FILE.CRF,PARSE.CRF PARUNV.CRF
@CREF
*FILE.LST=PARUNV.CRF
@IF (ERROR) @GOTO PUNT
@DELETE PARUNV.CRF,FILE.CRF,PARSE.CRF
@IF (ERROR) @GOTO PUNT
!
! Now load the result
!
@LINK
*TTY:/LOG/LOGLEV:0
*FILE/GO
@IF (ERROR) @GOTO PUNT
@SAVE FILE
@INFO VER
@GOTO DONE
!
! Clean up after any errors
!
PUNT::
@BOMB FILE:FILE.CTL,ASSEMBLY ERRORS EXIST
@IF (ERROR) !IGNORE IT
@PRINT FILE.LOG
@DELETE PARUNV.CRF,FILE.CRF,PARSE.CRF,PARUNV.UNV,PARUNV.REL,FILE.REL,PARSE.REL
DONE::
!
! Take a final directory
!
@VD *.*,
@CHECK SEQ
@
!JOB DONE