Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99o-bb - quasar.ctl
There are 39 other files named quasar.ctl in the archive. Click here to see a list.
;[QUASAR.CTL]
;
; 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	QSRCAT.MAC	QSRINF.MAC
;
; Input:	ACTSYM.UNV	D60JSY.UNV	GALCNF.UNV	GLXLIB.REL
;		GLXMAC.UNV	ORNMAC.UNV	QSRMAC.UNV	UUOSYM.UNV
;		CATPRM.UNV
;
; Output:	QSRMAC.UNV	QUASAR.EXE

BEGIN::

.R PEPB				;Initialize AUTOPATCH
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX

.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

.COMPILE/COMPILE ASL:QSRMAC.MAC

QMAC1::
.CHKPNT QMAC1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QADM0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QADM0::
.ERROR

.COMPILE/COMPILE ASL:QSRADM.MAC

QADM1::
.CHKPNT QADM1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QALC0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QALC0::
.ERROR

.COMPILE/COMPILE ASL:QSRALC.MAC

QALC1::
.CHKPNT QALC1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QCAT0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QCAT0::
.ERROR

.COMPILE/COMPILE ASL:QSRCAT.MAC

QCAT1::
.CHKPNT QCAT1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QDSP0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QDSP0::
.ERROR

.COMPILE/COMPILE ASL:QSRDSP.MAC

QDSP1::
.CHKPNT QDSP1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QFSS0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QFSS0::
.ERROR

.COMPILE/COMPILE ASL:QSRFSS.MAC

QFSS1::
.CHKPNT QFSS1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QINF0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QINF0::
.ERROR

.COMPILE/COMPILE ASL:QSRINF.MAC

QINF1::
.CHKPNT QINF1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QIPC0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QIPC0::
.ERROR

.COMPILE/COMPILE ASL:QSRIPC.MAC

QIPC1::
.CHKPNT QIPC1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QMDA0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QMDA0::
.ERROR

.COMPILE/COMPILE ASL:QSRMDA.MAC

QMDA1::
.CHKPNT QMDA1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QMEM0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QMEM0::
.ERROR

.COMPILE/COMPILE ASL:QSRMEM.MAC

QMEM1::
.CHKPNT QMEM1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QNET0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QNET0::
.ERROR

.COMPILE/COMPILE ASL:QSRNET.MAC

QNET1::
.CHKPNT QNET1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QQUE0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QQUE0::
.ERROR

.COMPILE/COMPILE ASL:QSRQUE.MAC

QQUE1::
.CHKPNT QQUE1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QSCH0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QSCH0::
.ERROR

.COMPILE/COMPILE ASL:QSRSCH.MAC

QSCH1::
.CHKPNT QSCH1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QT100	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QT100::
.ERROR

.COMPILE/COMPILE ASL:QSRT10.MAC

QT101::
.CHKPNT QT101

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QSR0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QSR0::
.ERROR

.COMPILE/COMPILE ASL:QUASAR.MAC

QSR1::
.CHKPNT QSR1

.ERROR %			;Trap USER errors
.PATH ASL:			;Path defined, is PEPB initialized
.IF (NOERROR) .GOTO QLNK0	;If NOERROR skip AUTOPATCH initialization
.ERROR
.R PEPB
*DEFINE-LOGICAL-NAMES GALAXY-10-V704
*EX
.
.PATH REL:=ASL:
.PATH UNV:=ASL:
.PATH ASL:/SEARCH

QLNK0::
.ERROR


.RUN LINK
*PAT:QUASAR/SAVE = /LOCALS /SYMSEG:LOW -
*ASL:QSRADM, ASL:QSRALC, ASL:QSRCAT, ASL:QSRDSP, ASL:QSRFSS, -
*ASL:QSRINF, 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 GAL704 = /MODIFY /DEPEND:-1
;
%FIN::
;[End of QUASAR.CTL]