Trailing-Edge
-
PDP-10 Archives
-
tops10_703a_sys_atpch16_bb-fr67f-bb
-
operat.ctl
There are 27 other files named operat.ctl in the archive. Click here to see a list.
;[OPERAT.CTL]
;
; This control file will build the GALAXY operator controller for a
; DECsystem-10. THE following files are required for a TOPS-10 OPR/ORION.
;
; Sources: OPR.MAC OPRCMD.MAC OPRERR.MAC OPRLOG.MAC
; OPRNET.MAC OPRPAR.MAC OPRQSR.MAC ORNMAC.MAC
; ORION.MAC CNFORN.MAC CNFTAB.MAC
;
; Input: ACTSYM.UNV GLXLIB.REL GLXMAC.UN QSRMAC.UNV
; UUOSYM.UNV NCPTAB.REL
;
; Output: OPR.EXE OPRPAR.REL ORION.EXE ORNMAC.UNV
BEGIN::
.R PEPB ;Initialize AUTOPATCH
*INIT GALAXY-10-V703
*EX
.PATH ASL:/SEARCH
.COMPILE/COMPILE ASL:ORNMAC.MAC
OMAC1::
.CHKPNT OMAC1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OPR0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OPR0::
.ERROR
.COMPILE/COMPILE ASL:OPR.MAC
OPR1::
.CHKPNT OPR1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OCMD0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OCMD0::
.ERROR
.COMPILE/COMPILE ASL:OPRCMD.MAC
OCMD1::
.CHKPNT OCMD1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OERR0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OERR0::
.ERROR
.COMPILE/COMPILE ASL:OPRERR.MAC
OERR1::
.CHKPNT OERR1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OLOG0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OLOG0::
.ERROR
.COMPILE/COMPILE ASL:OPRLOG.MAC
OLOG1::
.CHKPNT OLOG1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO ONET0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
ONET0::
.ERROR
.COMPILE/COMPILE ASL:OPRNET.MAC
ONET1::
.CHKPNT ONET1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OPAR0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OPAR0::
.ERROR
.COMPILE/COMPILE ASL:OPRPAR.MAC
OPAR1::
.CHKPNT OPAR1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OQSR0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OQSR0::
.ERROR
.COMPILE/COMPILE ASL:OPRQSR.MAC
OQSR1::
.CHKPNT OQSR1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO ORN0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
ORN0::
.ERROR
.COMPILE/COMPILE ASL:ORION.MAC
ORN1::
.CHKPNT ORN1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO CNF0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
CNF0::
.ERROR
.COMPILE/COMPILE ASL:CNFORN.MAC
CNF1::
.CHKPNT CNF1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO CTB0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
CTB0::
.ERROR
.COMPILE/COMPILE ASL:CNFTAB.MAC
.COMPILE/COMPILE ASL:CNFHDW.MAC
CTB1::
.CHKPNT CTB1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO OLNK0 ;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*INIT GALAXY-10-V703
*EX
.
.PATH ASL:/SEARCH
OLNK0::
.ERROR
.RUN LINK
*PAT:OPR/SAVE = /LOCALS /SYMSEG:LOW /SEGMENT:LOW -
*ASL:OPR, ASL:OPRPAR, ASL:OPRCMD /GO
.RUN LINK
*PAT:ORION/SAVE = /LOCALS /SYMSEG:LOW /SEGMENT:LOW -
*ASL:ORION, ASL:OPRQSR, ASL:OPRPAR, ASL:OPRLOG, ASL:OPRNET, ASL:OPRERR /GO
.PLEASE AUTOPATCH OPERAT Assembly Successful
.GOTO END
%CERR:: .GOTO ERROR
%ERR:: .GOTO ERROR
%TERR:: .GOTO ERROR
;
ERROR:: .PLEASE Error during AUTOPATCH OPERAT assembly
;
.COPY FAILUR.GAL=TTY: ;Set ERROR flag file on.
*OPERAT
=^Z
;
END::
;
.SUBMIT GAL703 = /MODIFY /DEPEND:-1
;
%FIN::
;[End of OPERAT.CTL]