Trailing-Edge
-
PDP-10 Archives
-
bb-l014r-bm_tops20_v6_1_atpch_18
-
autopatch/t26v61.ctl
There is 1 other file named t26v61.ctl in the archive. Click here to see a list.
;
; T26V61.CTL -- Patch and rebuild TOPS-20-2060-V6-1
; Version 2(0)
; June 9, 1983 / HAH
; March 1, 1984 / DEE
; March 19, 1984 / HAH
; September 4,1984 / DEE
; September 17, 1985 / DEE
; December 2, 1985 / DEE
;
;
; COPYRIGHT (c) 1983,1988 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.
;
;
; This .CTL file applies the patches to the libraries of
; TOPS-20-2060-V6-1 and rebuilds MONITR.EXE and EXEC.EXE.
;
; For this .CTL file to run, the connected directory must be
; the patching directory (Logical name PAT:).
;
; This control file is expected to run without errors.
;
;
@PEPB
*INITIALIZE TOPS-20-2060-V6-1
*EXIT
;
@DELETE PAT:*MON.*,PAT:MONITR.*,PAT:EXEC.*
@DELETE PAT:VERSIO.REL,PAT:STG*.REL
@EXP PAT:
@DEFINE DSK: ASL:
@DEFINE R: ASL:
@DEFINE SYS: ASL:
;
; Build the monitor
;
@RUN MACRO
*VERSIO=NAMAM0.MAC,VERSIO.MAC
*STG=PARAM0.MAC,PARAMS.MAC,STG.MAC
;
;
@TYPE P6LNK.CCL
@RUN LINK
*@P6LNK.CCL
*LN2061/S, -
*/NOLOCALS, -
*/SYSLIB, -
*/G
@EXP PAT:
@GET MON
@START 142
*0^[6M
*EDDTF/1
=BUGHLT<HLTADR^[12B
=BUGCHK<CHKADR^[11B
*DDTIBP^[10B
*^[10B+2/2
=^[G
;
@IF (NOERROR) @GOTO OK
TRY2::
@NOERROR
@TYPE LNKNEW.CCL
@TYPE PARNEW.MAC
@RUN MACRO
*STG=PARAM0.MAC,PARAMS.MAC,PARNEW.MAC,STG.MAC
;
@ERROR
@RUN LINK
*@LNKNEW.CCL
*@LNKINI.CCL
*LN2061/S, -
*/NOLOCALS, -
*/SYSLIB, -
*/G
@EXP PAT:
@GET MON
@START 142
*0^[6M
*EDDTF/1
=BUGHLT<HLTADR^[12B
=BUGCHK<CHKADR^[11B
*DDTIBP^[10B
*^[10B+2/2
=^[G
OK::
;
@DELETE PAT:MON.*
@EXP PAT:
;
; Build the EXEC
;
;
@RUN MACRO
*EXECC0=EXECF0.MAC,EXECCA.MAC
;
;
@RUN LINK
*TTY:/LOG/LOGL:5
*EXEC/SAVE
*T20EX6.REL
*EXECC0.REL
*MACREL.REL
*/G
@RUN EXEC
*Y
;
; Signal success
;
@EXP PAT:
@DEFINE SYS:
@PEPB
*SIGNAL-SUCCESS TOPS-20-2060-V6-1
*EXIT
@GOTO EXIT
;
; Signal failure on error
;
%ERR::
@EXP PAT:
@DEFINE SYS:
@PEPB
*SIGNAL-FAILURE TOPS-20-2060-V6-1
*EXIT
EXIT::
%FIN::