Trailing-Edge
-
PDP-10 Archives
-
dec-10-omona-u-mc9
-
syserr.ctl
There are 17 other files named syserr.ctl in the archive. Click here to see a list.
; Job %1(6) to make SYSERR.SHR from SYSERR.MAC
; Submit with command .SUBMIT SYSERR/RESTART:1/TIME:20:0/UNIQ:0
;DEFINE YOUR SYSTEM CONFIGURATION (DPANUM,ETC)IN SYRUNV.MAC IF
;NECESSARY FIRST.
;SECTION TO BUILD SOURCE LISTINGS IS COMMENTED OUT BECAUSE OF
;STORAGE REQUIREMENTS. TO GET LISTINGS, REMOVE THE ";" IN THE RIGHT
;PLACES. ALSO INSERT "/CREF" IN THE COMPILE COMMANDS.
; Required files: [10,7] (Latest released versions)
; MACRO.SHR
; LINK.SHR
; LNK???.SHR
; COMPIL.SHR
; JOBDAT.REL
; SCAN.REL
; HELPER.REL
;[SELF] SYSERR.MAC
; SYRUNV.MAC
; SYSERC.MAC
; SYSERA.MAC
; SYSERB.MAC
; SYSERS.MAC
; SYSERR.HLP
; Output files
; SYSERC.SHR
; SYSERR.SHR
; SYRUNV.UNV
; SYSERA.SHR
; SYSERB.SHR
; SYSERS.SHR
; SYSERR.MAP
; SYSERA.MAP
; SYSERB.MAP
; SYSERS.MAP
; SYRUNV.LST
; SYSERA.LST
; SYSERB.LST
; SYSERS.LST
; SYSERR.LST
; SYSERR.LOG
.PLEASE SYSERR SUBMISSION CONTROL FILE INITIALIZING
; Copy files from [10,7] and use private "SYS:"
; Make a record of what is being used
.SET WATCH VERSION
.IF (NOERROR) .GOTO A
A::;.ASSIGN DEC: SYS:
; CompILE, Load, Save, and Testing Section
.COMP SYRUNV
.DEL SYRUNV.REL
.COMP SYRLOW
.COMP SYRLIB
.COMP SYSERR
.COMP SYSERA
.COMP SYSERC
.COMP SYSERB
.COMP SYSERD
.COMP SYSERK
.COMP SYSERS
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERR/G
.SSAVE SYSERR
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERA/G
.SSAVE SYSERA
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERB/G
.SSAVE SYSERB
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERC/G
.SSAVE SYSERC
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERD/G
.SSAVE SYSERD
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERK/G
.SSAVE SYSERK
.R LINK
*DEC:SCAN,DEC:HELPER,SYSERS/G
.SSAVE SYSERS
; Try it just to make sure it works
.RUN DSK:SYSERR
*/HELP
.DEASSIGN
; Produce source listing
;.RUN CREF[10,7]
;*DSK:SYSERC.LST=SYSERC.CRF
;*DSK:SYSERR.LST_SYSERR.CRF
;*DSK:SYRUNV.LST=SYRUNV.CRF
;*DSK:SYSERA.LST=SYSERA.CRF
;*DSK:SYSERB.LST=SYSERB.CRF
;*DSK:SYSERS.LST=SYSERS.CRF
; Now get checksummed directories of all files
.RU DIRECT[10,7]
*TTY:=/CHECKSUM SYSER?.MAC,SYR???.*,SYSER?.EXE,SYSERR.CTL,SYR???.RN?,SYSERR.HLP,JOBDAT.REL,SCAN.REL,HELPER.REL
; Remove all temporary files
%ERR::
%FIN::.DEASSIGN
.IF (ERROR) ; Don't care if failed
.PLEASE SYSERR DONE
.IF (ERROR) .GOTO END
.K/F
END: