Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
quasar.ctl
There are 39 other files named quasar.ctl in the archive. Click here to see a list.
;
; COPYRIGHT (C) 1984, 1985 BY
; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MA.
;
; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED
; AND COPIED ONLY IN ACCORDANCE WITH THE TERMS OF SUCH
; LICENSE AND WITH THE INCLUSION OF THE ABOVE COPYRIGHT
; NOTICE. THIS SOFTWARE OR ANY OTHER COPIES THEREOF MAY NOT
; BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER
; PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS
; HEREBY TRANSFERRED.
;
; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE
; WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT
; BY DIGITAL EQUIPMENT CORPORATION.
;
; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR
; RELIABILITY OF ITS SOFTWARE ON EQUIPMENT WHICH IS NOT
; SUPPLIED BY DIGITAL.
;
;[QUASAR.CTL]
;
; Modified for GALAXY-10 AUTOPATCH by Carl T. Kunkel/20-May-83
;
; This control file will build the GALAXY queue manager for a
; DECsystem-10. The following files are required for a TOPS-10 QUASAR.
;
; Sources: QUASAR.MAC QSRADM.MAC QSRALC.MAC QSRDSP.MAC
; QSRFSS.MAC QSRIPC.MAC QSRMAC.MAC QSRMDA.MAC
; QSRMEM.MAC QSRNET.MAC QSRQUE.MAC QSRSCH.MAC
; QSRT10.MAC
;
; Input: ACTSYM.UNV D60JSY.UNV GALCNF.UNV GLXLIB.REL
; GLXMAC.UNV ORNMAC.UNV QSRMAC.UNV UUOSYM.UNV
;
; Output: QSRMAC.UNV QUASAR.EXE
BEGIN::
.R PEPB ;Initialize AUTOPATCH
*INITIALIZE GALAXY-10-V702
*EX
.PATH REL:=ASL:
.PATH ASL:/SEARCH
.COMPILE/COMPILE ASL:QSRMAC.MAC
QMAC1::
.CHKPNT QMAC1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QADM0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QADM0::
.COMPILE/COMPILE ASL:QSRADM.MAC
QADM1::
.CHKPNT QADM1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QALC0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QALC0::
.COMPILE/COMPILE ASL:QSRALC.MAC
QALC1::
.CHKPNT QALC1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QDSP0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QDSP0::
.COMPILE/COMPILE ASL:QSRDSP.MAC
QDSP1::
.CHKPNT QDSP1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QFSS0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QFSS0::
.COMPILE/COMPILE ASL:QSRFSS.MAC
QFSS1::
.CHKPNT QFSS1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QIPC0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QIPC0::
.COMPILE/COMPILE ASL:QSRIPC.MAC
QIPC1::
.CHKPNT QIPC1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QMDA0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QMDA0::
.COMPILE/COMPILE ASL:QSRMDA.MAC
QMDA1::
.CHKPNT QMDA1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QMEM0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QMEM0::
.COMPILE/COMPILE ASL:QSRMEM.MAC
QMEM1::
.CHKPNT QMEM1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QNET0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QNET0::
.COMPILE/COMPILE ASL:QSRNET.MAC
QNET1::
.CHKPNT QNET1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QQUE0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QQUE0::
.COMPILE/COMPILE ASL:QSRQUE.MAC
QQUE1::
.CHKPNT QQUE1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QSCH0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QSCH0::
.COMPILE/COMPILE ASL:QSRSCH.MAC
QSCH1::
.CHKPNT QSCH1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QT100 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QT100::
.COMPILE/COMPILE ASL:QSRT10.MAC
QT101::
.CHKPNT QT101
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QSR0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QSR0::
.COMPILE/COMPILE ASL:QUASAR.MAC
QSR1::
.CHKPNT QSR1
.ERROR % ;Trap USER errors
.PATH ASL: ;Path defined, PEPB initialized ?
.IF (NOERROR) .GOTO QLNK0 ;If NOERROR skip AUTOPATCH initialization
.R PEPB
*INITIALIZE GALAXY-10-V702
*EX
.
.PATH ASL:/SEARCH
QLNK0::
.RUN LINK
*PAT:QUASAR/SAVE = /LOCALS /SYMSEG:LOW -
*ASL:QSRADM, ASL:QSRALC, ASL:QSRDSP, ASL:QSRFSS, -
*ASL:QSRIPC, ASL:QSRMDA, ASL:QSRMEM, ASL:QSRNET, -
*ASL:QSRQUE, ASL:QSRSCH, ASL:QSRT10, ASL:QUASAR -
*/GO
.PLEASE AUTOPATCH QUASAR Assembly Successful
.GOTO END
%CERR:: .GOTO ERROR
%ERR:: .GOTO ERROR
%TERR:: .GOTO ERROR
ERROR:: .PLEASE Error during AUTOPATCH QUASAR assembly
;
.COPY FAILUR.GAL=TTY: ;Set ERROR flag file on.
*QUASAR
=^Z
;
END::
;
.SUBMIT GAL702 = /MODIFY /DEPEND:-1
;
%FIN::
;[End of QUASAR.CTL]