Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

;
;   T22V41.CTL -- Patch and rebuild TOPS-20-2020-V4-1
;   Version 2(2)
;	October 28, 1986 / HAH
;	February 25, 1983 / HAH
;	March 26, 1984 / DEE
;	September 5,1984 / 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-2020-V4-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-2020-V4-1
*EXIT
;
@COPY ASL:T2020.REL
@COPY ASL:T20EXA.REL
@COPY ASL:EXECC0.REL

@DELETE PAT:*MON.*,PAT:MONITR.*,PAT:EXEC.*
@DELETE PAT:VERSIO.REL,PAT:STG*.REL
@EXP PAT:


@DEF DSK: ASL:

;
;	Build the monitor
;

@RUN MACRO
*VERSIO=NAMAM0.MAC,VERSIO.MAC
*STGSM=KSPRE.MAC,PARAM0.MAC,PARAMS.MAC,STG.MAC
;
;
@RUN LINK
*TTY:/LOG/LOGL:5
*SMON/SAVE,/HASHSIZE:12007, -
*/FRECOR:0, -
*/SET:RSCOD:2000, -
*/SET:INCOD:72000,/SYMSEG:PSECT:INCOD, -
*/SET:PPVAR:114000, -
*/SET:RSVAR:120000, -
*/SET:SYVAR:220000, -
*/SET:PSVAR:240000, -
*/SET:JSVAR:330000, -
*/SET:NRVAR:420000, -
*/SET:NRCOD:445000/UPTO:444777, -
*/SET:BGSTR:674000, -
*/SET:BGPTR:704000, -
*/SET:POSTCD:706000, -
*/SET:NPVAR:711000, -
*/NOLOCALS, -
*MONSYM.REL, -
*LDINIT, -
*VERSIO,STGSM, -
*/LOCALS, -
*T2020/S, -
*/SYSLIB, -
*/G

@EXP PAT:
@GET SMON
@START 140
=BUGHLT<HLTADR12B
=BUGCHK<CHKADR11B
=G
;
@DELETE PAT:SMON.*
@RENAME SMONITR.EXE MONITR.EXE
@EXP PAT:

;
;	Build the EXEC
;

@RUN LINK
*TTY:/LOG/LOGL:5
*EXEC/SAVE
*T20EXA.REL
*EXECC0.REL
*MACREL.REL
*/G

@RUN EXEC
*Y

;
;	Signal success
;

@EXP PAT:
@PEPB
*SIGNAL-SUCCESS TOPS-20-2020-V4-1
*EXIT
@GOTO EXIT

;
;	Signal failure on error
;

%ERR::
@EXP PAT:
@PEPB
*SIGNAL-FAILURE TOPS-20-2020-V4-1
*EXIT

EXIT::
%FIN::