Google
 

Trailing-Edge - PDP-10 Archives - BB-L014C-BM - autopatch/t20bw4.003
There are no other files named t20bw4.003 in the archive.
	                 BEWARE INFORMATION FOR TOPS-20-V4  
  
                     BEWARE INFORMATION FOR EDIT 1930   IN MONITO               
  
Edit 1930 changes MONSYM, so new MAC, REL and UNV files are provided.
********************************************************************************
  
  
                     BEWARE INFORMATION FOR EDIT 1939   IN MONITO               
  
Edit 1939 in this patch set has a change which will be reflected in a future
Software Dispatch article.

Edit 1939 requires the following patch to be installed in CHECKD.MAC

1)2	PRGEDT==^D27			;EDIT NUMBER
1)	ENTVEC:	JRST START		;MAIN START
****
2)2	PRGEDT==^D28			;EDIT NUMBER
2)	ENTVEC:	JRST START		;MAIN START
**************
1)54		IDIV T1,SECPAG		;ROUND DOWN ADDRESS TO A PAGE BOUNDARY
****
2)54	;**;[28] Add 5 lines at NXTPR:+7L	PED	5-AUG-81
2)		MOVE T2,SECCYL		;[28] GET NUMBER OF PHYSICAL SECTORS
2)		ADD T2,LPPCYL		;[28]    IN A CYLINDER
2)		IDIV T1,T2		;[28] FIND NUMBER OF SECTORS
2)		IMUL T1,LPPCYL		;[28] FIND NUMBER OF LOST SECTORS
2)		SUBB T4,T1		;[28] ACCOUNT FOR LOST SECTORS
2)		IDIV T1,SECPAG		;ROUND DOWN ADDRESS TO A PAGE BOUNDARY
**************
1)83		PUSH P,T2
1)		IDIV T1,SECCYL		;FIND THE NUMBER OF CYL'S
1)		IMUL T1,LPPCYL		;FIND OFFSET
1)		POP P,T2		;RESTORE T2
1)		ADD T1,0(P)		;GET THE REAL DISK ADDRESS
1)		MOVEI T3,BPRBLK		;START OF THE PAIRS
****
2)83	;**;[28] Delete 5 lines at SEEADR:+3L	PED	5-AUG-81
2)	;	PUSH P,T2
2)	;	IDIV T1,SECCYL		;FIND THE NUMBER OF CYL'S
2)	;	IMUL T1,LPPCYL		;FIND OFFSET
2)	;	POP P,T2		;RESTORE T2
2)	;	ADD T1,0(P)		;GET THE REAL DISK ADDRESS
2)		MOVEI T3,BPRBLK		;START OF THE PAIRS
**************
********************************************************************************
  
  
                     BEWARE INFORMATION FOR EDIT 1942   IN MONITO               
  
Edit 1942 requires the following patch to be installed in CHKPNT.MAC

**************
1)2	VEDIT==115		;EDIT NUMBER
1)	VWHO==0			;GROUP WHO LAST EDITED PROGRAM (0=DEC DEVELOPMENT)
****
2)2	VEDIT==116		;EDIT NUMBER
2)	VWHO==0			;GROUP WHO LAST EDITED PROGRAM (0=DEC DEVELOPMENT)
**************
1)51		USMUP. <MOVEI T1,0>	;MONITOR UPTIME
1)		USCPN. <MOVEI T1,1>	;NUMBER OF CPU'S
1)		USCP0. <MOVE T1,2(P1)>	;SERIAL NUMBER OF CPU0
1)		USCP1. <MOVEI T1,0>	;SERIAL NUMBER OF CPU1
****
2)51	;**;[116] Change one line at UFRSTT: +3L	RAS	15-SEP-81
2)		USMUP. <MOVEI T1,2(P1)>	;MONITOR UPTIME
2)		USCPN. <MOVEI T1,1>	;NUMBER OF CPU'S
2)	;**;[116] Change one line at UFRSTT: +5L	RAS	15-SEP-81
2)		USCP0. <MOVE T1,3(P1)>	;SERIAL NUMBER OF CPU0
2)		USCP1. <MOVEI T1,0>	;SERIAL NUMBER OF CPU1
**************
1)51		USLCK. <MOVE T1,3(P1)>	;LAST CHECKPOINT DATE/TIME
1)	UFRSTL==.-UFRSTT
****
2)51	;**;[116] Change one line at UFRSTT: +11L	RAS	15-SEP-81
2)		USLCK. <MOVE T1,4(P1)>	;LAST CHECKPOINT DATE/TIME
2)	UFRSTL==.-UFRSTT
**************
********************************************************************************
                     BEWARE INFORMATION FOR EDIT 1956   IN MONITO               
  
Edit 1956 has been witheld.
********************************************************************************