<************************* SST 10-18 ***************************

<************************* SST 9-81 ****************************
9/1/81***********

THE SIX-MONTH SUPPORT WINDOW FOR FEP SOFTWARE (707020), VERSION C00,
HAS EXPIRED. VERSION C01 IS THE ONLY SUPPORTED VERSION. THE PATCH
FILES HAVE BEEN MODIFIED SO AS TO REFERENCE ONLY VERSION C01.

<************************* SST 8-81 ****************************
07/28/81****************
< NOTE: F00PATCH FILES NOW REFLECT THE POSSIBLE PRESENCE OF
< L6GHOST (L6G) VERSIONS C00 AND C01 ONLY. REFERENCES TO A00
< AND B00 HAVE BEEN DELETED, ALONG WITH THEIR SPECIFIC PATCHES.
07/17/81****************
<REPLACEMENT FOR GENMD OF SAME NUMBER DATED 06/21/81              #32229
< PATCH RELOCATION REDONE CORRECTLY, THIS TIME.                   #32229
< FORMAT INSTRUCTION ADDRESS CORRECTLY IN ANALZ TSTACK DISPLAY.   #32229
< 7 GENMDS TO ANLZ:                                               #32229
:GENMD,ANALZO5 PPO5+8CF,68000000+PATCH(4B300002+PPO5).    001-007 #32229
:GENMD,ANALZ PATCH+00,31300005+PATCH(0). SW  F00 07/16/81 002-007 #32229
:GENMD,ANALZ PATCH+01,68400003+PATCH(0). SW  F00 07/16/81 003-007 #32229
:GENMD,ANALZ PATCH+02,4B300000+M17(0).   SW  F00 07/16/81 004-007 #32229
:GENMD,ANALZ PATCH+03,4B300002+PPO5(0).  SW  F00 07/16/81 005-007 #32229
:GENMD,ANALZ PATCH+04,680008D0+PPO5(0).  SW  F00 07/16/81 006-007 #32229
:GENMD,ANALZ PATCH+05,1C000000(0).       SW  F00 07/16/81 007-007 #32229
07/10/81****************
PATCHES AND SYMBOLS RELATING TO ELLA VERSION F00 HAVE BEEN
REMOVED FROM 'F00PATCH'. ELLA VERSION F01 HAS BEEN AVAILABLE
ON SSTS SINCE SEPTEMBER, 1980, AND IS THE ONLY SUPPORTED VERSION.
07/02/81**************
< PATCH # 32289, DATED 3/26/81, HAS HAD A TYPOGRAPHICAL TRANSMISSION
<************************* SST 7-81 ****************************
06/22/81****************
<REPLACEMENT FOR GENMD OF SAME NUMBER DATED 12/03/80              #32229
< (PATCHES RELOCATED IN PATCH AREA)                               #32229
< FORMAT INSTRUCTION ADDRESS CORRECTLY IN ANALZ TSTACK DISPLAY.   #32229
< 7 GENMDS TO ANALZ;                                              #32229
:GENMD,ANALZO5 PPO5+8CF,68000000+PATCH(4B300002+PPO5).    001-007 #32229
:GENMD,ANALZ PATCH+00,31300023+PATCH(0). SW  F00 06/21/81 002-007 #32229
:GENMD,ANALZ PATCH+01,68400021+PATCH(0). SW  F00 06/21/81 003-007 #32229
:GENMD,ANALZ PATCH+02,4B300000+M17(0).   SW  F00 06/21/81 004-007 #32229
:GENMD,ANALZ PATCH+03,4B300002+PPO5(0).  SW  F00 06/21/81 005-007 #32229
:GENMD,ANALZ PATCH+04,680008D0+PPO5(0).  SW  F00 06/21/81 006-007 #32229
:GENMD,ANALZ PATCH+05,1C000000(0).       SW  F00 06/21/81 007-007 #32229
06/16/81*****************
< CFU GARBAGE COLLECTOR CAN TRASH FNE POINTERS IF PAX IS LARGE.   #32769
OPEN/CFUR+.8A/LW,6 LITERALS+.80(LI,6 1/  JBC F00 06/16/81 001-006 #32769
OPEN/CFUR+.8B/LW,7 LITERALS+.9B(LW,7 LITERALS+.80/        002-006 #32769
OPEN/CFUR+.8F/CS,6 2,4(CS,7 2,4/         JBC F00 06/16/81 003-006 #32769
OPEN/CFUR+.95/B @(B CFUR+.7A/            JBC F00 06/16/81 004-006 #32769
/@/LI,6 1/                               JBC F00 06/16/81 005-006 #32769
/@/B CFUR+.7A/                           JBC F00 06/16/81 006-006 #32769
06/04/81******************
< SJAC CAN BE LOST ON AN EXECUTE ONLY LMN IF USER TRIES TO        #32956
< GET DELTA WITH A CTL-Y DELTA SEQUENCE                           #32956
#J:UPRIV=.8C41                           JBC F00 06/03/81 001-012 #32956
STEPOVR/STPNR+.ADB/B @(LI,1 .A1/         JBC F00 06/03/81 002-012 #32956
/@/LW,1 J:UPRIV/                         JBC F00 06/03/81 003-012 #32956
/@/CW,1 LITERALS+6/                      JBC F00 06/03/81 004-012 #32956
/@/BAZ $+5/                              JBC F00 06/03/81 005-012 #32956
/@/LW,4 S:CUN/                           JBC F00 06/03/81 006-012 #32956
/@/LH,1 UH:FLG,4/                        JBC F00 06/03/81 007-012 #32956
/@/OR,1 LITERALS+.10/                    JBC F00 06/03/81 008-012 #32956
/@/STH,1 UH:FLG,4/                       JBC F00 06/03/81 009-012 #32956
/@/LI,1 .A1/                             JBC F00 06/03/81 010-012 #32956
/@/B STPNR+.ADC/                         JBC F00 06/03/81 011-012 #32956
#J:UPRIV;K1                              JBC F00 06/03/81 012-012 #32956
06/03/81*****************
< ALLOW PCL TO LIST A FILE CONTAINING THE UNDERSCORE              #32821
< CHARACTER IN THE FILE NAME.                                     #32821
< GENMD TO PCL:                                                   #32821
:GENMD CCTAB+3,7C007803(7C005803).       DCP F00 06/03/81 001-001 #32821
<************************* SST 6-81 ****************************
<************************* SST 5-81 ****************************
04/29/81***********
< THIS GENMD FIXES THE PROBLEM OF THE LAST LINE NOT BEING PRINTED #32889
< IN A FOOTNOTE WHICH IS INVOKED BY THE BLOCK CALLOUT COMMAND.    #32889
< GENMD TO TEXT V. XC0:                                           #32889
,39P+135,68000136+39P(6810013C+39P).     JEB XC0 04/29/81 001-001 #32889
<************************* SST 4-81 ***********************************
03/30/81****************
< **** REPLACEMENT FOR PATCH OF SAME NUMBER                       #32806
< **** DATED 12/4/80.                                             #32806
#MPCFLG=0                                JBC F00 03/27/81 001-032 #32806
#MPCDIO                                  JBC F00 03/27/81 002-032 #32806
#1                                       JBC F00 03/27/81 004-032 #32806
#MPCTIO                                  JBC F00 03/27/81 005-032 #32806
#MPCFLG=1                                JBC F00 03/27/81 006-032 #32806
#1                                       JBC F00 03/27/81 007-032 #32806
#MPCFLG                                  JBC F00 03/27/81 008-032 #32806
< IF AN MPC CONTROLLER GOES DOWN WHILE THE SYSTEM IS RUNNING AND  #32806
< A RECOVERY OCCURS THE SYSTEM WILL NOT COME BACK UP.  THE REASON #32806
< IS DUE TO INITRCVR'S LONELINESS AND SUBSEQUENT NEED TO TALK TO  #32806
< THE MPC'S AND HE WONT GIVE UP TRYING TO TALK TO THEM.  THIS PATC#32806
< WILL CAUSE INITRCVR TO ACT LIKE RECOVER AND ALLOW YOU TO SKIP   #32806
< DOWNLOADING AN MPC.  THE MPC ADDRESS WILL ALSO BE DISPLAYED.    #32806
< PATCH ALSO MAKES RECOVER ACT LIKE INITRCVR :                    #32806
<      STEP ONCE TO RETRY LOAD/ TWICE TO SKIP LOAD                #32806
< PATCH IS 2 PARTS  23 CARDS TO UMOV;   9 CARDS TO RECOVER        #32806
<                                                                 #32806
< PATCHES TO UMOV, MAKE INITRCVR ACT CORRECTLY                    #32806
UMOV/INITRCVR+.214/B @(HIO,0 1/          JBC F00 03/27/81 009-032 #32806
/@/LW,2 6/                               JBC F00 03/27/81 010-032 #32806
/@/SLS,2 -4/                             JBC F00 03/27/81 011-032 #32806
/@/LI,4 2/                               JBC F00 03/27/81 012-032 #32806
/@/SLD,2 -4/                             JBC F00 03/27/81 013-032 #32806
/@/SLS,3 -28/                            JBC F00 03/27/81 014-032 #32806
/@/LB,3 LITERALS+.93,3/                  JBC F00 03/27/81 015-032 #32806
/@/STB,3 INITRCVR+.222,4/                JBC F00 03/27/81 016-032 #32806
/@/BDR,4 $-4/                            JBC F00 03/27/81 017-032 #32806
/@/HIO,0 1/                              JBC F00 03/27/81 018-032 #32806
/@/B INITRCVR+.215/                      JBC F00 03/27/81 019-032 #32806
UMOV/INITRCVR+.222/.C34040F0/            JBC F00 03/27/81 020-032 #32806
UMOV/INITRCVR+.21B/B *14/                JBC F00 03/27/81 021-032 #32806
#1                                       JBC F00 03/27/81 022-032 #32806
#MPCFLG                                  JBC F00 03/27/81 023-032 #32806
< **** REPLACEMENT PATCH FOR ONE OF SAME NUMBER                   #32806
< **** DATED 12/4/80.                                             #32806
< IF AN MPC CONTROLLER GOES DOWN WHILE THE SYSTEM IS RUNNING AND  #32806
< A RECOVERY OCCURS THE SYSTEM WILL NOT COME BACK UP.  THE REASON #32806
< IS DUE TO INITRCVR'S LONELINESS AND SUBSEQUENT NEED TO TALK TO  #32806
< THE MPC'S AND HE WONT GIVE UP TRYING TO TALK TO THEM.  THIS PATC#32806
< WILL CAUSE INITRCVR TO ACT LIKE RECOVER AND ALLOW YOU TO SKIP   #32806
< DOWNLOADING AN MPC.  THE MPC ADDRESS WILL ALSO BE DISPLAYED.    #32806
< PATCH ALSO MAKES RECOVER ACT LIKE INITRCVR :                    #32806
<      STEP ONCE TO RETRY LOAD/ TWICE TO SKIP LOAD                #32806
< PATCH IS 2 PARTS  23 CARDS TO UMOV;   9 CARDS TO RECOVER        #32806
<                                                                 #32806
<  PATCHES TO RECOVER FOLLOW, CHANGE MPCDUMP SKIP/AND/BRANCH      #32806
< INSTRUCTIONS AND MESSAGE                                        #32806
RECOVER/MPCDUMP+.6D/B MPCDUMP+.5B(B MPCDUMP+.106/03/27/81 024-032 #32806
RECOVER/MPCDUMP+.6E/B MPCDUMP+.106(B MPCDUMP+.5B/03/27/81 025-032 #32806
RECOVER/MPCDUMP+.39B/.D94B40D6(.D94B40E3/JBC F00 03/27/81 026-032 #32806
RECOVER/MPCDUMP+.39C/.D5C3C540(.E6C9C3C5/JBC F00 03/27/81 027-032 #32806
RECOVER/MPCDUMP+.39D/.E3D640D9(.40E3D640/JBC F00 03/27/81 028-032 #32806
RECOVER/MPCDUMP+.39F/.404DE3E6(.E8404DD6/JBC F00 03/27/81 030-032 #32806
RECOVER/MPCDUMP+.3A0/.C9C3C540(.D5C3C540/JBC F00 03/27/81 031-032 #32806
#1                                       JBC F00 03/27/81 032-032 #32806
03/27/81****************
< **REPLACEMENT FOR GENMD OF SAME NUMBER DATED 12/04/80.          #32804
< ****MODIFIED TO USE BEGINNING OF PATCH AREA.                    #32804
< INVALID PUNCH CAN CAUSE CCI TO LOOP                             #32804
< JOB CANNOT BE X'D OR ABORTED                                    #32804
:GENMD JOBP+DD,68000000+CCIPCH(680000D0+JOBP).   02/26/81 001-004 #32804
:GENMD CCIPCH+00,21800015.               TJS F00 02/26/81 002-004 #32804
:GENMD CCIPCH+01,683000DE+JOBP.          TJS F00 02/26/81 003-004 #32804
:GENMD CCIPCH+02,680000D0+JOBP.          TJS F00 02/26/81 004-004 #32804

<** REPLACEMENT PATCH FOR ONE DATED 12/2/80, RELEASED ON JAN SST. #31958
<                                                                 #31958
< DELTA'S ;X (ENTER XCON) COMMAND DOES NOT WORK                   #31958
< PROPERLY.  THE XIT-CONTROL-IN-PROGRESS BIT IN THE JIT           #31958
< IS NOT GETTING SET, THUS THE XCON ROUTINE CAN HAVE              #31958
< PROBLEMS.                                                       #31958
< PATCH IS 2 PARTS - 10 CARDS TO ALTCP/ 8 GENMDS TO DELTA         #31958
<                                                                 #31958
< ALTCP PATCHES FOLLOW                                            #31958
#J:EXTENT=.8C48                          JBC F00 03/26/81 001-018 #31958
/ALTCP+.17D/B @(STH,3 UH:FLG,1/          JBC F00 03/26/81 002-018 #31958
/@/STH,3 UH:FLG,1/                       JBC F00 03/26/81 003-018 #31958
/@/LW,2 TSTACK/                          JBC F00 03/26/81 004-018 #31958
/@/BEZ ALTCP+.17E/                       JBC F00 03/26/81 006-018 #31958
/@/LW,11 LITERALS+.21/                   JBC F00 03/26/81 007-018 #31958
/@/STS,11 J:EXTENT/                      JBC F00 03/26/81 008-018 #31958
/@/B ALTCP+.17E/                         JBC F00 03/26/81 009-018 #31958
#J:EXTENT;K1                             JBC F00 03/26/81 010-018 #31958
< DELTA'S ;X (ENTER XCON) COMMAND DOES NOT WORK                   #31958
< PROPERLY.  THE XIT-CONTROL-IN-PROGRESS BIT IN THE JIT           #31958
< IS NOT GETTING SET, THUS THE XCON ROUTINE CAN HAVE              #31958
< PROBLEMS.                                                       #31958
< PATCH IS 2 PARTS - 9 CARDS TO ALTCP/ 8 GENMDS TO DELTA          #31958
<                                                                 #31958
< PATCHES TO DELTA FOLLOW                                         #31958
:GENMD DEL+4EF,68000000+PCH(04900005).   JBC F00 03/26/81 011-018 #31958
:GENMD PCH+0,22000000.                   JBC F00 03/26/81 012-018 #31958
:GENMD PCH+1,46000000+PCHD.              JBC F00 03/26/81 013-018 #31958
:GENMD PCH+2,04900005.                   JBC F00 03/26/81 014-018 #31958
:GENMD DEL+6A2,68000003+PCH(680004D4+DEL).   F00 03/26/81 015-018 #31958
:GENMD PCH+3,33F00000+PCHD.              JBC F00 03/26/81 016-018 #31958
:GENMD PCH+4,680004D4+DEL.               JBC F00 03/26/81 017-018 #31958
:GENMD PCHD+0,0.                         JBC F00 03/26/81 018-018 #31958

< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 10/02/79.            #32289
< THE ORIGINAL PATCH DID NOT CONSIDER THE (RARE) POSSIBILITY OF   #32289
< RMP DISKS ON A SIGMA, OR OF MIXED RMP-NONRMP PACKS ON ANY CPU.  #32289
< CODE HAS BEEN ADDED TO CHECK THAT THIS OPERATION IS ON AN RMP,  #32289
< CARDS 1,63,64, AND 77 OF 77 TO IMPLEMENT THIS PATCH.            #32289
< A NEW (AND BETTER) VERSION OF VOLINIT HAS                       #32289
< BEEN ON THE SST SINCE 1979.                                     #32289
< FILE NAMES ARE AS FOLLOWS: UP:VOLINIT, BO:VOLINIT, DIAG.        #32289
<THESE PATCHES ARE SOME OF THE SOLUTIONS TO THE RMP PROBLEM       #32289
< WITH VOLINIT                                                    #32289
<                                                                 #32289
<      NOTE:                                                      #32289
<                                                                 #32289
<             THIS PATCH IS ONLY NEEDED ON 560S OR WITH RMP PACKS #32289
<             TO IMPLEMENT THIS PATCH, TURN THE X560 SWITCH ON    #32289
<                                                                 #32289
<                        #X560=1                                  #32289
<                                                                 #32289
<             AT THE BEGINNING OF THE PATCH DECK.                 #32289
#X560                                    GMO F00 03/26/81 001-077 #32289
#CKRMP=@                                 GMO F00 03/26/81 002-077 #32289
/@/LB,2 DCT22,3/                         GMO F00 03/26/81 003-077 #32289
/@/LW,12 NSPT,2/                         GMO F00 03/26/81 004-077 #32289
/@/CI,12 .C/                             GMO F00 03/26/81 005-077 #32289
/@/BNE *11/                              GMO F00 03/26/81 006-077 #32289
/@/LW,12 NTPC,2/                         GMO F00 03/26/81 007-077 #32289
/@/CI,12 .13/                            GMO F00 03/26/81 008-077 #32289
/@/BNE *11/                              GMO F00 03/26/81 009-077 #32289
/@/AI,11 .2/                             GMO F00 03/26/81 010-077 #32289
RMAOV/FISH+.5BB/B @(LCI 0/               GMO F00 03/26/81 012-077 #32289
/@/BAL,11 CKRMP/                         GMO F00 03/26/81 013-077 #32289
/@/LCI 0/                                GMO F00 03/26/81 014-077 #32289
/@/B FISH+.5BC/                          GMO F00 03/26/81 015-077 #32289
/@/LD,12 DCT13,3/                        GMO F00 03/26/81 016-077 #32289
/@/LC DCT20,3/                           GMO F00 03/26/81 017-077 #32289
/@/B FISH+.5BD/                          GMO F00 03/26/81 018-077 #32289
RMAOV/FISH+.5BE/B @ (LCI 0/              GMO F00 03/26/81 019-077 #32289
/@/BAL,11 CKRMP/                         GMO F00 03/26/81 020-077 #32289
/@/LCI 0/                                GMO F00 03/26/81 021-077 #32289
/@/B FISH+.58F/                          GMO F00 03/26/81 022-077 #32289
/@/LCI O/                                GMO F00 03/26/81 023-077 #32289
/@/B FISH+.5BC/                          GMO F00 03/26/81 024-077 #32289
< M;DOPEN SETS HIGH ORDER BIT FOR IN CIT4 FOR RMP DEVICE          #32289
RMAOV/FISH .3AB/B @(STW,9 DCT9,2/        GMO F00 03/26/81 025-077 #32289
/@/STW,9 DCT9,2/                         GMO F00 03/26/81 026-077 #32289
/@/LH,1 DCT23,2/                         GMO F00 03/26/81 027-077 #32289
/@/BE FISH .3AC/                         GMO F00 03/26/81 028-077 #32289
/@/LB,1 DCT22,2/                         GMO F00 03/26/81 029-077 #32289

/@/LW,8 NSPT,1/                          GMO F00 03/26/81 030-077 #32289
/@/CI,8 .C/                              GMO F00 03/26/81 031-077 #32289
/@/BNE FISH .3AC/                        GMO F00 03/26/81 032-077 #32289
/@/LW,8 NTPC,1/                          GMO F00 03/26/81 033-077 #32289
/@/CI,8 .13/                             GMO F00 03/26/81 034-077 #32289
/@/LB,1 DCT2,2/                          GMO F00 03/26/81 036-077 #32289
/@/LW,9 LITERALS .23/                    GMO F00 03/26/81 037-077 #32289
/@/STS,9 CIT4,1/                         GMO F00 03/26/81 038-077 #32289
/@/B FISH .3AC/                          GMO F00 03/26/81 039-077 #32289
<M:DCLOSE RESETS BIT IN CIT4 WHEN ALL DEVICES ARE NOT IN DIAG MODE#32289
RMAOV/FISH .46C/B @(STW,8 DCT9,2/        GMO F00 03/26/81 040-077 #32289
/@/STW,8 DCT9,2/                         GMO F00 03/26/81 041-077 #32289
/@/LH,5 DCT23,2/                         GMO F00 03/26/81 042-077 #32289
/@/BE FISH .46D/                         GMO F00 03/26/81 043-077 #32289
/@/LB,5 DCT22,2/                         GMO F00 03/26/81 044-077 #32289
/@/LW,8 NSPT,5/                          GMO F00 03/26/81 045-077 #32289
/@/CI,8 .C/                              GMO F00 03/26/81 046-077 #32289
/@/BNE FISH .46D/                        GMO F00 03/26/81 047-077 #32289
/@/LW,8 NTPC,5/                          GMO F00 03/26/81 048-077 #32289
/@/CI,8 .13/                             GMO F00 03/26/81 049-077 #32289
/@/BNE FISH .46D/                        GMO F00 03/26/81 050-077 #32289
/@/LI,5 DCTSIZ/                          GMO F00 03/26/81 051-077 #32289
/@/LB,8 DCT2,2/                          GMO F00 03/26/81 052-077 #32289
/@/CB,8 DCT2,5/                          GMO F00 03/26/81 053-077 #32289
/@/BNE . 3/                              GMO F00 03/26/81 054-077 #32289
/@/INT,9 DCT9,5/                         GMO F00 03/26/81 055-077 #32289
/@/BCS,2 FISH .46D/                      GMO F00 03/26/81 056-077 #32289
/@/BDR,5 .-5/                            GMO F00 03/26/81 057-077 #32289
/@/LB,5 DCT2,2/                          GMO F00 03/26/81 058-077 #32289
/@/AND,8 LITERALS .62/                   GMO F00 03/26/81 060-077 #32289
/@/STW,8 CIT4,5/                         GMO F00 03/26/81 061-077 #32289
/@/B FISH .46D/                          GMO F00 03/26/81 062-077 #32289
#                                        GMO F00 03/26/81 063-077 #32289
#X560                                    GMO F00 03/26/81 064-077 #32289
<CONTINUATION OF PATCHES FOR VOLINIT PROBLEM                      #32289
< UMOV OVERLAY ...                                                #32289
UMOV/HANDLERS+.1EA/B @(BAL,10 HANDLERS+.BD/  F00 03/26/81 065-077 #32289
/@/LH,6 DCT1,1/                          GMO F00 03/26/81 066-077 #32289
/@/TIO,8 0,6/                            GMO F00 03/26/81 067-077 #32289
/@/BCS,12 IOQ .E8/                       GMO F00 03/26/81 068-077 #32289
/@/LI,10 HANDLERS+.1EB/                  GMO F00 03/26/81 069-077 #32289
/@/B HANDLERS+.BD/                       GMO F00 03/26/81 070-077 #32289
<DONT DO PRE-SEEKS WHEN A RMP DEVICE ON CONTROLLER IS IN DIAG MODE#32289
UMOV/HANDLERS .27F/B @(B HANDLERS .C5/   GMO F00 03/26/81 071-077 #32289
/@/LB,5 DCT2,1/                          GMO F00 03/26/81 072-077 #32289
/@/MTW,0 CIT4,5/                         GMO F00 03/26/81 073-077 #32289
/@/BGE HANDLERS .C5/                     GMO F00 03/26/81 074-077 #32289
/@/AND,4 LITERALS .62/                   GMO F00 03/26/81 075-077 #32289
/@/B HANDLERS .C5/                       GMO F00 03/26/81 076-077 #32289
#                                        GMO F00 03/26/81 077-077 #32289

< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 01/02/80.            #32438
< USER PATCH FOR SIDR 32156 FIXES PROBLEM DESCRIBED BUT CAUSES    #32438
< HOTAVR TO FORGET A DRIVE ONCE IT HAS BEEN LOOKED AT THE         #32438
< FIRST TIME.  TRY THIS PATCH INSTEAD                             #32438
UMOV/HOTAVR+.2E/BCS,6 @(BCS,6 ;Q)/       JBC F00 03/26/81 002-006 #32438
/@/BCR,4 HOTAVR+.11/                     JBC F00 03/26/81 003-006 #32438
/@/BCS,1 HOTAVR+.11/                     JBC F00 03/26/81 004-006 #32438
/@/B HOTAVR+.55/                         JBC F00 03/26/81 005-006 #32438
#                                        JBC F00 03/26/81 006-006 #32438
03/26/81********************
< STOP POSSIBLE 7E-40 IF AN RBT SENDS .80 SCB AND NEXT BLOCK      #32674
< CONTAINS SAME RCB.                                              #32674
#HASPIO                                  PLS F00 06/16/80 001-005 #32674
UMOV/HASPIO+.DF/BE @(BE HASPIO+.E5/      PLS F00 06/16/80 002-005 #32674
/@/LB,5 STB:Q,4/                         PLS F00 06/16/80 003-005 #32674
/@/B HASPIO+.E5/                         PLS F00 06/16/80 004-005 #32674
#                                        PLS F00 06/16/80 005-005 #32674

< DONT DISCONNECT LINE IF AN RBT SENDS PEND INSTEAD OF WAB.       #32675
#HASPIO                                  PLS F00 06/16/80 001-005 #32675
UMOV/HASPIO+.28/B @(B BSCIO+6/           PLS F00 06/16/80 002-005 #32675
/@/AND,11 LITERALS+.5B/                  PLS F00 06/16/80 003-005 #32675
/@/B BSCIO+6/                            PLS F00 06/16/80 004-005 #32675
#                                        PLS F00 06/16/80 005-005 #32675

< **** REPLACEMENT PATCH FOR ONE DATED 4/22/80.                   #32701
< I FOUND THE OTHER CASE WHERE DUAL ACCESS 7275'S CAN SEEM TO     #32701
< HANG THE SYSTEM.   7275 FAULTS CAN REPORT BOTH DEV AUTO & NOT OP#32701
<                                                                 #32701
< A FAULT ON A 7275 CAN SOMETIMES SEEM TO HANG THE SYSTEM         #32701
UMOV/IOQ+.247/B @(BAZ IOQ+.253/          JBC F00 03/26/81 001-010 #32701
/@/BAZ IOQ+.253/                         JBC F00 03/26/81 002-010 #32701
/@/LC 13/                                JBC F00 03/26/81 003-010 #32701
/@/BCS,4 $+2/                            JBC F00 03/26/81 004-010 #32701
/@/BCS,2 IOQ+.253/                       JBC F00 03/26/81 005-010 #32701
/@/SCS,13 4/                             JBC F00 03/26/81 006-010 #32701
/@/LC 13/                                JBC F00 03/26/81 007-010 #32701
/@/BCR,6 IOQ+.248/                       JBC F00 03/26/81 008-010 #32701
/@/BCR,4 IOQ+.253/                       JBC F00 03/26/81 009-010 #32701
/@/B IOQ+.248/                           JBC F00 03/26/81 010-010 #32701

< CORRECT PLATEN COMMAND TO ALLOW LOWERCASE OR TRAILING BLANK.    #32825
< GENMD TO TEL:                                                   #32825
,TEL+4CD,21100000(216000D5).             SW  F00 03/26/81 001-001 #32825

< FORCE OC ERROR MESSAGE AFTER LAST RETRY FAILS ON CERTAIN        #32829
< DISK PACK ERROR CONDITIONS WHICH DIDN'T DO IT BEFORE.           #32829
UMOV/HANDLERS+.255/LI,12 .8008(LI,12 8/  RMS F00 03/26/81 001-001 #32829

<************************* SST 3-81 ***********************************
<************************* SST 2-81 ***********************************
01/30/81*************************
< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 01/02/80             #32482
< INCORRECT CODE IN TEL SETAMR ALLOWS !SET M:C TO WORK IN BATCH.  #32482
,RESET+5DC,116805F0+RESET(116805EE+RESET).   F00 01/31/80 001-005 #32482
,RESET+5E2,03D47AC3(04D47AE4).           GH  F00 01/31/80 002-005 #32482
,RESET+5E3,40404040(C3404040).           GH  F00 01/31/80 003-005 #32482
,RESET+5EE,04D47AE4(03D47AC3).           GH  F00 01/31/80 004-005 #32482
< NOTE: PATCH #31958, A ROOT PATCH TO ALTCP DATED 12/02/80,
< IS DEFECTIVE AND MUST BE REMOVED. A REPLACEMENT PATCH WILL
< BE ISSUED SOON.

< NOTE: AS CP-V ONLINE VOLINIT VERSION E02 IS THE ONLY VERSION
< STILL SUPPORTED, PATCH FILES HAVE BEEN MODIFIED TO CONSIDER
< ONLY VERSION E02. PATCHES AND CONDITIONAL SYMBOLS TO OTHER
< VERSIONS HAVE BEEN REMOVED.

01/22/81**************
< REPLACEMENT FOR GENMD OF SAME NUMBER DATED 12/03/80             #32128
< CP5DUMP GETS CREATED IN CURRENT ACCOUNT, FIX OPEN FPT           #32128
< TO OPEN INPUT CP5DUMP IN CURRENT ACCOUNT                        #32128
:GENMD,ANALZ PP+320,02010002(02010202).  JBC F00 01/22/81 001-001 #32128
01/21/81***************
< CHANGE 2-SECTOR COMPARE TO A 1-SECTOR COMPARE, IF IT'S          #32828
< NOT AN RMP DISK. GENMD TO VOLINIT E02:                          #32828
,VTOC+D8D,68000000+PATCH(3570066D+VTOC). DL  F00 01/20/81 001-007 #32828
,PATCH+00,3570066D+VTOC.                 DL  F00 01/20/81 002-007 #32828
,PATCH+01,21700002.                      DL  F00 01/20/81 003-007 #32828
,PATCH+02,68300D8E+VTOC.                 DL  F00 01/20/81 004-007 #32828
,PATCH+03,22700400.                      DL  F00 01/20/81 005-007 #32828
,PATCH+04,3570061F+VTOC.                 DL  F00 01/20/81 006-007 #32828
,PATCH+05,68000D8E+VTOC.                 DL  F00 01/20/81 007-007 #32828
<************************* SST 1-81 ***********************************
12/15/80******************
#NSCPU                                   JBC F00 04/22/80 001-008 #32566
< SLAVE POWER FAIL SAFE DOES NOT LOAD THE USERS MAPS CORRECTLY    #32566
< ON POWER ON, THIS CAN CAUSE MANY PROBLEMS, MOST HAVE BEEN       #32566
< 7E-40 ON MP SYSTEMS AFTER A POWER FAILURE                       #32566
/SFAULT+.109/B @(BAL,12 SMON+.E/         JBC F00 04/22/80 002-008 #32566
/@/BAL,12 SMON+.E/                       JBC F00 04/22/80 003-008 #32566
/@/LW,4 S:CUN/                           JBC F00 04/22/80 004-008 #32566
/@/BEZ SFAULT+.10A/                      JBC F00 04/22/80 005-008 #32566
/@/LI,11 SFAULT+.10A/                    JBC F00 04/22/80 006-008 #32566
/@/B MM+.3BE/                            JBC F00 04/22/80 007-008 #32566
#1                                       JBC F00 04/22/80 008-008 #32566
< DELTA'S ;X (ENTER XCON) COMMAND DOES NOT WORK                   #31958
< PROPERLY.  THE XIT-CONTROL-IN-PROGRESS BIT IN THE JIT           #31958
< IS NOT GETTING SET, THUS THE XCON ROUTINE CAN HAVE              #31958
< PROBLEMS.                                                       #31958
< PATCH IS 2 PARTS - 10 CARDS TO ALTCP/ 8 GENMDS TO DELTA         #31958
<                                                                 #31958
< ALTCP PATCHES FOLLOW                                            #31958
#J:EXTENT=.8C48                          JBC F00 12/02/80 001-018 #31958
/ALTCP+.17D/B @(STH,3 UH:FLG,1/          JBC F00 12/02/80 002-018 #31958
/@/STH,3 UH:FLG,1/                       JBC F00 12/02/80 003-018 #31958
/@/LW,3 TSTACK/                          JBC F00 12/02/80 004-018 #31958
/@/MTW,0 -15,3/                          JBC F00 12/02/80 005-018 #31958
/@/BEZ ALTCP+.17E/                       JBC F00 12/02/80 006-018 #31958
/@/LW,3 LITERALS+.21/                    JBC F00 12/02/80 007-018 #31958
/@/STS,3 J:EXTENT/                       JBC F00 12/02/80 008-018 #31958
/@/B ALTCP+.17E/                         JBC F00 12/02/80 009-018 #31958
#J:EXTENT;K1                             JBC F00 12/02/80 010-018 #31958
< DELTA'S ;X (ENTER XCON) COMMAND DOES NOT WORK                   #31958
< IS NOT GETTING SET, THUS THE XCON ROUTINE CAN HAVE              #31958
< PROBLEMS.                                                       #31958
< PATCH IS 2 PARTS - 9 CARDS TO ALTCP/ 8 GENMDS TO DELTA          #31958
<                                                                 #31958
< PATCHES TO DELTA FOLLOW                                         #31958
:GENMD DEL+4EF,68000000+PCH(04900005).   JBC F00 12/02/80 011-018 #31958
:GENMD PCH+0,22000000.                   JBC F00 12/02/80 012-018 #31958
:GENMD PCH+1,46000000+PCHD.              JBC F00 12/02/80 013-018 #31958
:GENMD PCH+2,04900005.                   JBC F00 12/02/80 014-018 #31958
:GENMD DEL+6A2,68000003+PCH(680004D4+DEL).   F00 12/02/80 015-018 #31958
:GENMD PCH+3,33F00000+PCHD.              JBC F00 12/02/80 016-018 #31958
:GENMD PCH+4,680004D4+DEL.               JBC F00 12/02/80 017-018 #31958
:GENMD PCHD+0,0.                         JBC F00 12/02/80 018-018 #31958
< IF RBBAT OR ALLOCAT TRAPS, SCREECH THE SYSTEM WITH              #32677
< BB-USR# REQUIRED SYSTEM GHOST HAS TRAPPED SCREECH               #32677
< THIS WILL PREVENT LOSE OF BATCH QUE AND OTHER PROBLEMS          #32677
< AND ALLOW BETTER AND FASTER FIX TO THE PROBLEM THAT             #32677
< CAUSED THE TRAP.  THE ACTUAL REASON FOR THE TRAP WILL           #32677
< BE IN J:TRAP.                                                   #32677
/ALTCP+.1F0/BAZ @(BAZ ALTCP+.22C/        GAF F00 12/03/80 001-007 #32677
/@/CI,4 3/                               GAF F00 12/03/80 002-007 #32677
/@/BG ALTCP+.22C/                        GAF F00 12/03/80 003-007 #32677
/@/STW,4 6/                              GAF F00 12/03/80 004-007 #32677
/@/STS,6 @+2/                            GAF F00 12/03/80 005-007 #32677
/@/XPSD,10 RCVPSD/                       GAF F00 12/03/80 006-007 #32677
/@/.00BB0000/                            GAF F00 12/03/80 007-007 #32677
< THE SWAP SCHEDULER CAN GET LOGJAMMED UNDER CERTAIN RATHER       #31209
< RARE CIRCUMSTANCES. IF YOU GET A MODERATE-SIZED USER IN         #31209
< CORE WHO IS WALKING THROUGH THE FILE SYSTEM USING NXTA AND      #31209
< NXTF, AND A REALLY BIG (MAXMEM) USER WHO IS AT JOB STEP         #31209
< (AND THUS ELIGIBLE FOR SPECIAL-COMPUTE STATUS) IS THE HIGHEST-  #31209
< PRIORITY USER ON THE INSWAP LIST, THINGS CAN GO ALL TO HELL     #31209
< SINCE: THE BIG GUY CAN'T BE INSWAPPED UNLESS THE FILE-SYSTEM    #31209
< WALKER GETS OUTSWAPPED ('CAUSE HE'S TOO BIG TO SHARE THE        #31209
< AVAILABLE MEMORY); THE WALKER WON'T GET OUTSWAPPED SINCE        #31209
< HE'S STAYING IN THE OPEN/CLOSE USER STATUS (WHICH HAS A HEALTHY #31209
< PRIORITY BOOST); AND NO ONE ELSE CAN GET IN 'CAUSE THEIR        #31209
< PRIORITIES ARE ALL TOO LOW. THUS, NOBODY BUT THE OPEN-CLOSE     #31209
< DUDE GETS ANY TIME AT ALL. ABORTING ANYBODY OR DOING ANYTHING   #31209
< ELSE TO PUSH SOME SMALL USER'S PRIORITY UP ABOVE THE BIG        #31209
< GUY'S WILL BREAK THE LOGJAM.                                    #31209
<                                                                 #31209
/SCHED+.247/BAL,1 @ (BAL,1 SCHED+.1F5/   DCP F00 01/07/80 001-006 #31209
/@/LB,2 UB:PCT,4/                        DCP F00 01/07/80 002-006 #31209
/@/SLS,2 1/                              DCP F00 01/07/80 003-006 #31209
/@/CW,2 TABLES+.46/                      DCP F00 01/07/80 004-006 #31209
/@/BL SCHED+.1F5/                        DCP F00 01/07/80 005-006 #31209
/@/B SCHED+.246/                         DCP F00 01/07/80 006-006 #31209
< SYSTEM CAN HANG IF CPI IS 0 AND COC DOES ESCAPE-X               #32805
< PROCESSING. ARSZ GETS SET TO X'FF' INCORRECTLY.                 #32805
#LN1839=COCR+.2D8                        JBC F00 12/04/80 002-009 #32805
#ELSE                                    JBC F00 12/04/80 003-009 #32805
#LN1839=COCR+.2D4                        JBC F00 12/04/80 004-009 #32805
#1                                       JBC F00 12/04/80 005-009 #32805
/LN1839/B @(B *13/                       JBC F00 12/04/80 006-009 #32805
/@/LI,15 0/                              JBC F00 12/04/80 007-009 #32805
/@/B *13/                                JBC F00 12/04/80 008-009 #32805
#LN1839;K1                               JBC F00 12/04/80 009-009 #32805
< ***********************************************************     #32649
< REPLACEMENT PATCH FOR #31611 DATED 01/11/79 AND FOR             #32649
<        # X31611 DATED 01/19/80                                  #32649
< FIXES PROBLEM OF RCE INITIALIZATION ON SYSTEMS WITH >128 K      #32649
< THAT WOULD CAUSE SOME SBCES NOT TO BE REPORTED                  #32649
<                                                                 #32649
< MAKE MOS INITIALIZATION RUN UNMAPPED..AND THUS USABLE BY GHOST1 #32649
< AND CONTROL                                                     #32649
< 3 PATCHES, 1 TO ROOT/INITIAL, 1 TO GHOST11, 1 GENMD TO CONTROL  #32649
/@@/TUNA! 0/                             JBC F00 04/21/80 001-024 #32649
/@/0/                                    JBC F00 04/21/80 002-024 #32649
/@/INITIAL+.5C/                          JBC F00 04/21/80 003-024 #32649
/@/.07800000/                            JBC F00 04/21/80 004-024 #32649
/@/XPSD,0 TUNA/                          JBC F00 04/21/80 005-024 #32649
/INITIAL+.8F/B @(B *11/                  JBC F00 04/21/80 006-024 #32649
/@/LI,5 .1FFFF/                          JBC F00 04/21/80 007-024 #32649
/@/LW,4 11/                              JBC F00 04/21/80 008-024 #32649
/@/STS,4 TUNA/                           JBC F00 04/21/80 009-024 #32649
/@/LPSD,0 TUNA/                          JBC F00 04/21/80 010-024 #32649
/COCD+.59/B TUNA+.4/                     JBC F00 04/21/80 011-024 #32649
/PFSR+.9F/BAL,11 COCD+.59(BAL,11 INITIAL+.5C/F00 04/21/80 012-024 #32649
#TUNA;K1                                 JBC F00 04/21/80 013-024 #32649
< REPLACEMENT PATCH FOR # 31611 DATED 01/11/79                    #32649
< *** SOLVES 7E-40 DURING PFSR *******************                #32649
< ** AND THE SYSTEM HANG ON PFSR CAUSED BY 01/11/79 VERSION **    #32649
< SOLVES THE "TOPROOT MUST BE BELOW X'8000'" RESTRICTION          #32649
< =====> NOTE: THIS PATCH DEPENDS ON A SPARE CELL AT THE END      #32649
<              OF COCD (COCD+.59)                                 #32649
< ***********************************************************     #32649
GHOST11/GHOST1D+.D8/BAL,11 COCD+.59(BAL,11 INITIAL+.5C/   014-024 #32649
< REPLACEMENT PATCH FOR #X31611 DATED 01/11/79                    #32649
< *** SOLVES 7E-40 DURING PFSR *******************                #32649
< ** AND THE SYSTEM HANG ON PFSR CAUSED BY 01/11/79 VERSION **    #32649
< SOLVES THE "TOPROOT MUST BE BELOW X'8000'" RESTRICTION          #32649
< =====> NOTE: THIS PATCH DEPENDS ON A SPARE CELL AT THE END      #32649
<              OF COCD (COCD+.59)                                 #32649
< ***********************************************************     #32649
< MEMORY.....PERFORM THIS ACTION IN THE MONITOR ROOT...           #32649
< 2 PATCHES, 1 TO ROOT/INITIAL, 1 GENMD TO CONTROL                #32649
:GENMD,CONTROL MOS+1AE,02000000.         JBC F00 04/21/80 015-024 #32649
:GENMD,CONTROL MOS+1AF,02000000.         JBC F00 04/21/80 016-024 #32649
:GENMD,CONTROL MOS+1B0,02000000.         JBC F00 04/21/80 017-024 #32649
:GENMD,CONTROL MOS:PP+0,22400001(00000BAD).  F00 04/21/80 019-024 #32649
:GENMD,CONTROL MOS:PP+1,35B00007(00000BAD).  F00 04/21/80 020-024 #32649
:GENMD,CONTROL MOS:PP+2,6AB00059+COCD:(00000BAD).04/21/80 021-024 #32649
:GENMD,CONTROL MOS:PP+3,32B00007(00000BAD).  F00 04/21/80 022-024 #32649
:GENMD,CONTROL MOS:PP+4,6D000027(00000BAD).  F00 04/21/80 023-024 #32649
:GENMD,CONTROL MOS:PP+5,680001B3+MOS(00000BAD).  04/21/80 024-024 #32649
< FILES OPENED INOUT AND CLOSED WITHOUT MODIFICATIONS WILL        #32432
< STILL GET THE "MODIFIED SINCE LAST BACKUP" DESCRIPTOR BIT       #32432
< SET.  FIX THIS.                                                 #32432
CLOSE/CLS+.156/B @(B CLS+.15A)/          FHK F00 12/02/80 001-008 #32432
/@/LW,1 13,6/                            FHK F00 12/02/80 002-008 #32432
/@/LW,2 0,1/                             FHK F00 12/02/80 003-008 #32432
/@/CI,2 .A00/                            FHK F00 12/02/80 004-008 #32432
/@/BANZ CLS+.15A/                        FHK F00 12/02/80 005-008 #32432
/@/CW,2 LITERALS+.1D/                    FHK F00 12/02/80 006-008 #32432
/@/BAZ CLS+.177/                         FHK F00 12/02/80 007-008 #32432
/@/B CLS+.15A/                           FHK F00 12/02/80 008-008 #32432
< FIX 75-XX ERRORS WHEN A FILE IS OPENED OUTIN                    #32781
< KEYED AND ALL RECORDS WRITTEN ARE DELETED                       #32781
CLOSE/DLT+.1CA/BAZ @(BAZ DLT+.1DE)/      JBC F00 12/02/80 001-004 #32781
/@/MTW,0 .9600/                          JBC F00 12/02/80 002-004 #32781
/@/BNEZ DLT+.1DE/                        JBC F00 12/02/80 003-004 #32781
/@/B DLT+.1CB/                           JBC F00 12/02/80 004-004 #32781
< A SPURIOUS TIME KEYIN CAN CLOBBER PART OF THE SYSTEM'S          #32742
< TIME, ALTHOUGH IT TELLS THE OPERATOR 'EH?'.                     #32742
< 7 PATCHES TO KEYIN, USES 3 PATCH LOCATIONS.                     #32742
#TIME=LITERALS+.AE                       SW  F00 12/02/80 001-007 #32742
KEYIN/KEYN+.204/STW,2 5(STH,2 TIME/      SW  F00 12/02/80 002-007 #32742
KEYIN/KEYN+.209/B @(LI,3 0/              SW  F00 12/02/80 003-007 #32742
/@/STH,5 TIME/                           SW  F00 12/02/80 004-007 #32742
/@/LI,3 0/                               SW  F00 12/02/80 005-007 #32742
/@/B KEYN+.20A/                          SW  F00 12/02/80 006-007 #32742
#TIME;K1 DELETE                          SW  F00 12/02/80 007-007 #32742
< A SPURIOUS DATE KEYIN CAN CLOBBER PART OF SYSTEM'S DATE.        #32741
< THIS PATCH DEPENDS ON A SPARE WORD AT KEYIN+.225, WHICH         #32741
< RESULTS FROM A BOUND 8 PRECEEDING.                              #32741
< 6 PATCHES TO KEYIN, NO PATCH LOCATIONS.                         #32741
#DATE=LITERALS+.AC                       SW  F00 12/02/80 001-006 #32741
KEYIN/KEYN+.21C/STH,2 5(STH,2 DATE/      SW  F00 12/02/80 002-006 #32741
KEYIN/KEYN+.220/STS,2 5(STS,2 DATE/      SW  F00 12/02/80 003-006 #32741
KEYIN/KEYN+.224/STW,5 DATE(B KEYN+.74/   SW  F00 12/02/80 004-006 #32741
KEYIN/KEYN+.225/B KEYN+.74/              SW  F00 12/02/80 005-006 #32741
#DATE;K1                                 SW  F00 12/02/80 006-006 #32741
< A SMALL TIMING WINDOW EXIST IN KEYIN SUCH THAT KEYIN'S          #32700
< AVR ENDACTION ROUTINE CAN CLOBBER OTHER WORDS IN MEMORY         #32700
< USUALLY SHOWS UP AS A TRAP40 WITH TRAP WORD = X'01000001'       #32700
KEYIN/KEYN+.439/B @(LW,1 S:CUN/          JBC F00 04/22/80 001-004 #32700
/@/WD,0 .37/                             JBC F00 04/22/80 002-004 #32700
/@/LW,1 S:CUN/                           JBC F00 04/22/80 003-004 #32700
/@/B KEYN+.43A/                          JBC F00 04/22/80 004-004 #32700
< INVALID B5 ERRORS CAN OCCUR                                     #32712
#MSK=@                                   JBC F00 12/05/80 001-005 #32712
/@/AND,12 LITERALS+.54/                  JBC F00 12/05/80 002-005 #32712
/@/B LNKTRC+.33F/                        JBC F00 12/05/80 003-005 #32712
LDLNK/LNKTRC+.15A/BAL,13 MSK(BAL,13 LNKTRC+.33F/ 12/05/80 004-005 #32712
LDLNK/LNKTRC+.15D/BAL,13 MSK(BAL,13 LNKTRC+.33F/ 12/05/80 005-005 #32712
< MAKE SURE J:CCBUF DOESNT GET CLOBBERED WHEN A ZERO LENGTH       #32435
< COMMAND STRING IS PASSED.                                       #32435
LDLNK/LNKTRC+.15E/LB,6 *12(LB,2 *12/     JBC F00 12/08/80 001-014 #32435
LDLNK/LNKTRC+.15F/BEZ LNKTRC+.169(SLS,2 -2/  F00 12/08/80 002-014 #32435
LDLNK/LNKTRC+.160/SLS,6 -2(AW,12 2/      JBC F00 12/08/80 003-014 #32435
LDLNK/LNKTRC+.161/AW,12 6(BAL,13 LNKTRC+.33F/F00 12/08/80 004-014 #32435
LDLNK/LNKTRC+.162/BAL,13 MSK(SW,12 2/    JBC F00 12/08/80 005-014 #32435
LDLNK/LNKTRC+.163/SW,12 6(LB,5 *12/      JBC F00 12/08/80 006-014 #32435
LDLNK/LNKTRC+.164/LB,6 *12(BEZ LNKTRC+.16C/  F00 12/08/80 007-014 #32435
LDLNK/LNKTRC+.165/CI,6 79(CI,5 79/       JBC F00 12/08/80 008-014 #32435
LDLNK/LNKTRC+.167/LI,6 79(LI,5 79/       JBC F00 12/08/80 009-014 #32435
LDLNK/LNKTRC+.168/STB,6 *3(STB,5 *3/     JBC F00 12/08/80 010-014 #32435
LDLNK/LNKTRC+.169/LB,13 *12,6(LB,13 *12,5/   F00 12/08/80 011-014 #32435
LDLNK/LNKTRC+.16A/STB,13 *3,6(STB,13 *3,5/   F00 12/08/80 012-014 #32435
LDLNK/LNKTRC+.16B/BDR,6 LNKTRC+.169(BDR,5 LNKTRC+.169/    013-014 #32435
#MSK;K1                                  JBC F00 12/08/80 014-014 #32435
<BAD BRANCH CAUSES B5-4A ABORT TO BECOME A B5-AA                  #32707
LDLNK/LNKTRC+.347/B LNKTRC+.554(B LNKTRC+.54F/   12/02/80 001-001 #32707
<DONT ALLOW A USER WITH :USERS OPEN TO AUTOSAVE                   #32672
< THIS CAN CAUSE :USERS TO BE HUNG OPEN FOR LONG                  #32672
< PERIODS OF TIME                                                 #32672
LDLNK/LNKTRC+.3FD/BAL,5 @(BAL,5 COCR+.9F/JBC F00 12/02/80 001-005 #32672
/@/LH,2 UH:FLG,1/                        JBC F00 12/02/80 002-005 #32672
/@/CI,2 4/                               JBC F00 12/02/80 003-005 #32672
/@/BANZ 0,5/                             JBC F00 12/02/80 004-005 #32672
/@/B COCR+.9F/                           JBC F00 12/02/80 005-005 #32672
< IF LINK/LDTRC LMN NAME IS GREATER THAN 11 CHARACTERS            #32434
< ABORT THE ACTION WITH A B504 ERROR INSTEAD OF CONTINUING        #32434
< THE LOAD AND ABORTING LATER WITH A B503                         #32434
< ADD THE APPROIATE MESSAGE TO YOUR ERROR FILE FOR THE B504       #32434
< LMN NAME IS GREATER THAN 11 CHARACTERS FOR LINK/LDTRC           #32434
LDLNK/LNKTRC+.5E/LI,10 4(.7AE2E8E2/      JBC F00 12/02/80 001-007 #32434
LDLNK/LNKTRC+.5F/B LNKTRC+.554(.40404040/JBC F00 12/02/80 002-007 #32434
LDLNK/LNKTRC+.2D7/B LNKTRC+.5E/          JBC F00 12/02/80 003-007 #32434
LDLNK/LNKTRC+.291/LW,13 LITERALS+.A8(LW,13 LNKTRC+.5E/    004-007 #32434
LDLNK/LNKTRC+.292/LW,14 LITERALS+.A9(LW,14 LNKTRC+.5F/    005-007 #32434
LDLNK/LNKTRC+.2E9/CW,13 LITERALS+.A8(CW,13 LNKTRC+.5E/    006-007 #32434
LDLNK/LNKTRC+.2EB/CW,14 LITERALS+.A9(CW,14 LNKTRC+.5F/    007-007 #32434
< THIS PATCH STOPS 7E-40 OR 61-40 IF USER GETS B5-57 ERROR AND    #32560
< THEN REPEATS THE OPERATION THAT GOT THE ERROR.                  #32560
LDLNK/LNKTRC+.3AA/CAL1,1 LNKTRC+.58(CAL1,1 LNKTRC+.3C/    001-001 #32560
< THE M:PURGE CAL WITH ONLY THE READ OPTION DOES NOT CLEAR        #32163
< TYPED-AHEAD INPUT CHARACTERS                                    #32163
< SUGGESTED FIX:                                                  #32163
MISOV/UCAL+.1C3/CI,6 2(BAZ UCAL+.1C6)/   SR  F00 01/02/80 002-003 #32163
MISOV/UCAL+.1C4/BAZ UCAL+.1C6(LW,1 6)/   SR  F00 01/02/80 003-003 #32163
< DISABLE THE TIC'S BC-23 CHECKER. IT ISN'T NEEDED,               #31665
< AND ABORTS ON SOME LEGITIMATE MESSAGE NAMES.                    #31665
TQOV1/TPQ1+.752/B TPQ1+.760(LI,15 .4B/   JB  F00 01/02/80 001-001 #31665
<**************************
#MPCTIO                                  JBC F00 12/05/80 001-017 #31640
< THIS PATCH IS MEANT TO REPLACE PATCH #31640, DATED 11/10/78.    #31640
< THE ORIGINAL PATCH COULD CAUSE 7E-40 WHILE RUNNING THE          #31640
< ONLINE DIAGNOSTICS FOR MPC TAPES.                               #31640
<SET DENSITY AT 1600BPI FOR ALL TAPE MOUNTS OF MPC TAPES.         #31640
UMOV/IOQ+.2B1/BE @(BE IOQ+.27C/          JBC F00 12/05/80 002-017 #31640
/@/INT,13 DCT9,7/                        JBC F00 12/05/80 003-017 #31640
/@/BCS,2 IOQ+.27C/                       JBC F00 12/05/80 004-017 #31640
/@/EXU IOQ+.27C/                         JBC F00 12/05/80 005-017 #31640
/@/LI,2 .20/                             JBC F00 12/05/80 006-017 #31640
/@/WD,2 .1200/                           JBC F00 12/05/80 007-017 #31640
/@/LW,12 $+8/                            JBC F00 12/05/80 008-017 #31640
/@/OR,12 7/                              JBC F00 12/05/80 009-017 #31640
/@/LI,13 0/                              JBC F00 12/05/80 010-017 #31640
/@/LW,15 LITERALS+.23/                   JBC F00 12/05/80 011-017 #31640
/@/LI,0 0/                               JBC F00 12/05/80 012-017 #31640
/@/BAL,11 IOQM+.41/                      JBC F00 12/05/80 013-017 #31640
/@/NOP/                                  JBC F00 12/05/80 014-017 #31640
/@/B IOQ+.280/                           JBC F00 12/05/80 015-017 #31640
#1                                       JBC F00 12/05/80 017-017 #31640
< INITRCVR SOMETIMES IGNORES WHICH REGISTER BLOCK THE SCREECH     #32667
< CODE IS IN, CAUSING WRONG MESSAGE TO BE PRINTED.                #32667
UMOV/INITRCVR+.4E/B @(LW,13 TABLES+.25D/ GAF F00 12/03/80 001-008 #32667
/@/LW,13 TCATCH+.51/                     GAF F00 12/03/80 002-008 #32667
/@/CI,13 .10/                            GAF F00 12/03/80 003-008 #32667
/@/BAZ $+3/                              GAF F00 12/03/80 004-008 #32667
/@/LW,13 TABLES+.26D/                    GAF F00 12/03/80 005-008 #32667
/@/B INITRCVR+.4F/                       GAF F00 12/03/80 006-008 #32667
/@/LW,13 TABLES+.25D/                    GAF F00 12/03/80 007-008 #32667
/@/B INITRCVR+.4F/                       GAF F00 12/03/80 008-008 #32667
< USER PATCH FOR SIDR 32156 FIXES PROBLEM DESCRIBED BUT CAUSES    #32438
< HOTAVR TO FORGET A DRIVE ONCE IT HAS BEEN LOOKED AT THE         #32438
< FIRST TIME.  TRY THIS PATCH INSTEAD                             #32438
UMOV/HOTAVR+.2E/BCS,6 @(BCS,6 ;Q)/       JBC F00 01/02/80 001-004 #32438
/@/BCR,4 HOTAVR+.11/                     JBC F00 01/02/80 002-004 #32438
/@/BCS,1 HOTAVR+.11/                     JBC F00 01/02/80 003-004 #32438
/@/B HOTAVR+.55/                         JBC F00 01/02/80 004-004 #32438
< PROBLEMS CAN OCCUR IF A ,F KEYIN IS ISSUED TO A NON-MPC DEVICE  #32513
< THIS IS CAUSED BY IOQ NOT PULLING THE RETURN ADDRESS OFF        #32513
< THE STACK BEFORE HE EXITS TO TP32 TO WRITE THE 'EH?' MSG.       #32513
<   ******** N O T I C E ********                                 #32513
< TO SAVE ON PATCH LOCATIONS, THE ERROR MESSAGE USED FOR          #32513
< ERSEND MSGS BEING TOO LONG - "MESSAGE TRUNCATED" WILL BE        #32513
< SHORTENED TO "MSG TRUNC" IN ORDER TO FREE UP THE PATCH          #32513
< SPACE I NEED.  **PLEASE NOTE THIS CHANGE IN YOUR                #32513
< OPERATIONS DOCUMENTATION**                                      #32513
<                                                                 #32513
/IOQM+.1CC/.0B1505D4(.131505D4)/         JBC F00 12/03/80 001-006 #32513
/IOQM+.1CD/.E2C740E3(.C5E2E2C1)/         JBC F00 12/03/80 002-006 #32513
/IOQM+.1CE/.D9E4D5C3(.C7C540E3)/         JBC F00 12/03/80 003-006 #32513
<                                                                 #32513
/IOQM+.1CF/PLW,11 TSTACK(.D9E4D5C3)/     JBC F00 12/03/80 004-006 #32513
/IOQM+.1D0/B IOQM+.188(.C1E3C5C4)/       JBC F00 12/03/80 005-006 #32513
UMOV/IOQ+.49F/BAZ IOQM+.1CF(BAZ IOQM+.188)/  F00 12/03/80 006-006 #32513
< VISTA HANDLER MUST RESET THE TIME-OUT BIT IN DCT3               #32542
< CAUSE HE EXITS TO IOSCU SAYING RETRY, THUS WILL NEVER GO        #32542
< KEYIN PENDING, THUS NO MESSAGE, THUS NO RETRY KEYIN, THUS       #32542
< IOQ (TP33) WILL NEVER RESET THE T-O BIT.                        #32542
#V2IO                                    JBC F00 12/03/80 001-007 #32542
UMOV/V2IO+.3C/BANZ @(BANZ V2IO+.10E/     JBC F00 12/03/80 002-007 #32542
/@/LB,12 DCT3,1/                         JBC F00 12/03/80 003-007 #32542
/@/AND,12 LITERALS+.67/                  JBC F00 12/03/80 004-007 #32542
/@/STB,12 DCT3,1/                        JBC F00 12/03/80 005-007 #32542
/@/B V2IO+.10E/                          JBC F00 12/03/80 006-007 #32542
#1                                       JBC F00 12/03/80 007-007 #32542
< A FAULT ON A 7275 CAN SOMETIMES SEEM TO HANG THE SYSTEM         #32701
< PATCH IS TO IOQ, DUAL ACCESS REJECT PATH                        #32701
UMOV/IOQ+.247/B @(BAZ IOQ+.253/          JBC F00 04/22/80 001-006 #32701
/@/SCS,13 4/                             JBC F00 04/22/80 002-006 #32701
/@/BCR,6 IOQ+.248/                       JBC F00 04/22/80 004-006 #32701
/@/BCR,4 IOQ+.253/                       JBC F00 04/22/80 005-006 #32701
/@/B IOQ+.248/                           JBC F00 04/22/80 006-006 #32701
<                                                                 #32807
< FOLLOWING PATCHES WILL FIX MANY MPC TAPE PROBLEMS               #32807
<                                                                 #32807
#MPCTIO                                  JBC F00 12/04/80 001-038 #32807
< FIX PROBLEM OF DENSITY CHANGE CELLS NOT GETTING ZEROED EXCEPT   #32807
< ON TAPE REWINDS.  PATCH ZERO AFTER EACH SUCCESSFUL READ.        #32807
UMOV/MPCTIO+.60/B @(BCR,9 IOQ+.2F5/      JBC F00 12/04/80 002-038 #32807
/@/LI,11 0/                              JBC F00 12/04/80 003-038 #32807
/@/LH,5 DCT7,1/                          JBC F00 12/04/80 004-038 #32807
/@/STD,11 12,5/                          JBC F00 12/04/80 005-038 #32807
/@/EXU MPCTIO+.5F/                       JBC F00 12/04/80 006-038 #32807
/@/BCR,9 IOQ+.2F5/                       JBC F00 12/04/80 007-038 #32807
/@/B MPCTIO+.61/                         JBC F00 12/04/80 008-038 #32807
< SECOND PART OF THIS PATCH WILL CAUSE THE INITIAL READ TO BE     #32807
< RETRIED 3 TIMES.  NORMALLY IF THE INITIAL READ GIVES AN         #32807
< INCOMPATIABLE MODE ERROR (BAD DENSITY), THEN WE JUST SWITCH     #32807
< DENSITY AND TRY ONCE AT THE OTHER DENSITY.                      #32807
UMOV/MPCTIO+.23D/B @(CI,6 2/             JBC F00 12/04/80 009-038 #32807
/@/CI,7 3/                               JBC F00 12/04/80 010-038 #32807
/@/BG $+3/                               JBC F00 12/04/80 011-038 #32807
/@/AI,7 1/                               JBC F00 12/04/80 012-038 #32807
/@/B MPCTIO+.239/                        JBC F00 12/04/80 013-038 #32807
/@/CI,6 2/                               JBC F00 12/04/80 014-038 #32807
/@/BGE MPCTIO+.23F/                      JBC F00 12/04/80 015-038 #32807
/@/LI,7 0/                               JBC F00 12/04/80 016-038 #32807
/@/LW,8 LITERALS+.22/                    JBC F00 12/04/80 017-038 #32807
/@/B MPCTIO+.237/                        JBC F00 12/04/80 018-038 #32807
< IF WE CANT READ THE TAPE MAKE SURE WE ZERO THE CHK              #32807
< CELLS FOR THE NEXT MOUNT TRY                                    #32807
UMOV/MPCTIO+.241/B @(B IOQ+.2F5/         JBC F00 12/04/80 019-038 #32807
/@/LI,7 0/                               JBC F00 12/04/80 020-038 #32807
/@/STD,7 12,5/                           JBC F00 12/04/80 021-038 #32807
/@/B IOQ+.2F5/                           JBC F00 12/04/80 022-038 #32807
< PATCH WILL FORCE ALL MPC TAPE RETRY COUNTS TO 64 IF LESS        #32807
< THAN 64                                                         #32807
UMOV/IOQ+.26/B @(AND,11 12/              JBC F00 12/04/80 023-038 #32807
/@/AND,11 12/                            JBC F00 12/04/80 024-038 #32807
/@/LB,2 IOQ7,3/                          JBC F00 12/04/80 025-038 #32807
/@/LB,8 DCT24,2/                         JBC F00 12/04/80 026-038 #32807
/@/CI,8 4/                               JBC F00 12/04/80 027-038 #32807
/@/BAZ $+8/                              JBC F00 12/04/80 028-038 #32807
/@/LB,2 DCT4,2/                          JBC F00 12/04/80 029-038 #32807
/@/LC TB:FLGS,2/                         JBC F00 12/04/80 030-038 #32807
/@/BCS,4 $+5/                            JBC F00 12/04/80 031-038 #32807
/@/BCR,8 $+4/                            JBC F00 12/04/80 032-038 #32807
/@/CI,11 64/                             JBC F00 12/04/80 033-038 #32807
/@/BGE $+2/                              JBC F00 12/04/80 034-038 #32807
/@/LI,2 0/                               JBC F00 12/04/80 036-038 #32807
/@/B IOQ+.27/                            JBC F00 12/04/80 037-038 #32807
#1                                       JBC F00 12/04/80 038-038 #32807
<**************************
#MPCDUMP                                 JBC F00 12/04/80 001-025 #32806
< IF AN MPC CONTROLLER GOES DOWN WHILE THE SYSTEM IS RUNNING AND  #32806
< A RECOVERY OCCURS THE SYSTEM WILL NOT COME BACK UP.  THE REASON #32806
< IS DUE TO INITRCVR'S LONELINESS AND SUBSEQUENT NEED TO TALK TO  #32806
< THE MPC'S AND HE WONT GIVE UP TRYING TO TALK TO THEM.  THIS PATC#32806
< WILL CAUSE INITRCVR TO ACT LIKE RECOVER AND ALLOW YOU TO SKIP   #32806
< DOWNLOADING AN MPC.  THE MPC ADDRESS WILL ALSO BE DISPLAYED.    #32806
< PATCH ALSO MAKES RECOVER ACT LIKE INITRCVR :                    #32806
<      STEP ONCE TO RETRY LOAD/ TWICE TO SKIP LOAD                #32806
< PATCH IS 2 PARTS  13 CARDS TO UMOV;   8 CARDS TO RECOVER        #32806
<                                                                 #32806
< PATCHES TO UMOV, MAKE INITRCVR ACT CORRECTLY                    #32806
UMOV/INITRCVR+.214/B @(HIO,0 1/          JBC F00 12/04/80 002-025 #32806
/@/LW,2 6/                               JBC F00 12/04/80 003-025 #32806
/@/SLS,2 -4/                             JBC F00 12/04/80 004-025 #32806
/@/LI,4 2/                               JBC F00 12/04/80 005-025 #32806
/@/SLD,2 -4/                             JBC F00 12/04/80 006-025 #32806
/@/SLS,3 -28/                            JBC F00 12/04/80 007-025 #32806
/@/LB,3 LITERALS+.93,3/                  JBC F00 12/04/80 008-025 #32806
/@/STB,3 INITRCVR+.222,4/                JBC F00 12/04/80 009-025 #32806
/@/BDR,4 $-4/                            JBC F00 12/04/80 010-025 #32806
/@/B INITRCVR+.215/                      JBC F00 12/04/80 012-025 #32806
UMOV/INITRCVR+.222/.C34040F0/            JBC F00 12/04/80 013-025 #32806
UMOV/INITRCVR+.21B/B *14/                JBC F00 12/04/80 014-025 #32806
#1                                       JBC F00 12/04/80 015-025 #32806
#MPCDUMP                                 JBC F00 12/04/80 016-025 #32806
< IF AN MPC CONTROLLER GOES DOWN WHILE THE SYSTEM IS RUNNING AND  #32806
< A RECOVERY OCCURS THE SYSTEM WILL NOT COME BACK UP.  THE REASON #32806
< IS DUE TO INITRCVR'S LONELINESS AND SUBSEQUENT NEED TO TALK TO  #32806
< THE MPC'S AND HE WONT GIVE UP TRYING TO TALK TO THEM.  THIS PATC#32806
< WILL CAUSE INITRCVR TO ACT LIKE RECOVER AND ALLOW YOU TO SKIP   #32806
< DOWNLOADING AN MPC.  THE MPC ADDRESS WILL ALSO BE DISPLAYED.    #32806
< PATCH ALSO MAKES RECOVER ACT LIKE INITRCVR :                    #32806
<      STEP ONCE TO RETRY LOAD/ TWICE TO SKIP LOAD                #32806
< PATCH IS 2 PARTS  13 CARDS TO UMOV;   8 CARDS TO RECOVER        #32806
<                                                                 #32806
<  PATCHES TO RECOVER FOLLOW, CHANGE MPCDUMP SKIP/AND/BRANCH      #32806
< INSTRUCTIONS AND MESSAGE                                        #32806
RECOVER/MPCDUMP+.6D/B MPCDUMP+.5B(B MPCDUMP+.106/12/04/80 017-025 #32806
RECOVER/MPCDUMP+.6E/B MPCDUMP+.106(B MPCDUMP+.5B/12/04/80 018-025 #32806
RECOVER/MPCDUMP+.39B/.D94B40D6(.D94B40E3/JBC F00 12/04/80 019-025 #32806
RECOVER/MPCDUMP+.39C/.D5C3C540(.E6C9C3C5/JBC F00 12/04/80 020-025 #32806
RECOVER/MPCDUMP+.39D/.E3D640D9(.40E3D640/JBC F00 12/04/80 021-025 #32806
RECOVER/MPCDUMP+.39E/.C5E3D9E8(.D9C5E3D9/JBC F00 12/04/80 022-025 #32806
RECOVER/MPCDUMP+.39F/.404DE3E6(.E8404DD6/JBC F00 12/04/80 023-025 #32806
RECOVER/MPCDUMP+.3A0/.C9C3C540(.D5C3C540/JBC F00 12/04/80 024-025 #32806
#1                                       JBC F00 12/04/80 025-025 #32806
<LET CPV DO THE ERROR CORRECTION ON RMP DISC DRIVES.              #32567
<THE 560 RMP ERROR CORRECTION WAS NOT ALWAYS DOING A GOOD JOB.    #32567
<MOVE THE ERROR CORRECTION BACK INTO CPV WHERE IT RESIDES FOR     #32567
<OTHER DRIVES. TO GET THE FULL BENIFIT OF THIS PATCH YOU          #32567
<SHOULD REALLY RESTORE A COMPLETE FILE SYSTEM ON FRESHLY          #32567
<VOLINITED PACKS.                                                 #32567
#X560                                    DGH F00 10/29/79 001-016 #32567
UMOV/HANDLERS .204/@+;Q(.2000000/        DGH F00 10/29/79 002-016 #32567
UMOV/HANDLERS .205/.200+;Q(.1E800200/    DGH F00 10/29/79 003-016 #32567
/@/AI,9 .200/                            DGH F00 10/29/79 004-016 #32567
<CHECK FOR DISC PACK                                              #32567
/@/CI,10 HANDLERS .1EB/                  DGH F00 10/29/79 005-016 #32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 006-016 #32567
<CHECK FOR RMP DISC                                               #32567
/@/LB,5 DCT22,1/                         DGH F00 10/29/79 007-016 #32567
/@/LW,11 NSPT,5/                         DGH F00 10/29/79 008-016 #32567
/@/CI,11 .C/                             DGH F00 10/29/79 009-016 #32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 010-016 #32567
/@/LW,11 NTPC,5/                         DGH F00 10/29/79 011-016 #32567
/@/CI,11 .13/                            DGH F00 10/29/79 012-016 #32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 013-016 #32567
<ITS AN RMP, MAKE ORDER CODE X'42'                                #32567
/@/OR,8 LITERALS+.22/ Y4                 DGH F00 10/29/79 014-016 #32567
/@/B HANDLERS .C5/                       DGH F00 10/29/79 015-016 #32567
< ANLZ-SNOOP IMPROPERLY CALLS AN OUTIN CFU 'INOUT'.               #32788
< GENMD TO ANLZ.                                                  #32788
ANALZO6,PPO6+21E,1200025C+PPO6(1200025B+PPO6).   12/03/80 001-001 #32788
<CLEAR BUFFER DURING PASS2 OUTPUT TO AVOID LATER  GARBAGE.        #32761
<GENMD'S TO ANALZ.                                                #32761
ANALZ,PP+657,35100000+PTR(35100000+BUFSIZ).  F00 12/03/80 001-002 #32761
ANALZ,PP+658,6A000000+BUFOUT(04100000+WRITBUF).  12/03/80 002-002 #32761
< FORMAT INSTRUCTION ADDRESS CORRECTLY IN ANALZ TSTACK DISPLAY.   #32229
< 7 GENMDS TO ANALZ; USES PATCH+28 (.1E) THRU PATCH+35(.23)       #32229
:GENMD,ANALZO5 PPO5+8CF,6800001E+PATCH(4B300002+PPO5).    001-007 #32229
:GENMD,ANALZ PATCH+1E,31300023+PATCH(0). SW  F00 12/03/80 002-007 #32229
:GENMD,ANALZ PATCH+1F,68400021+PATCH(0). SW  F00 12/03/80 003-007 #32229
:GENMD,ANALZ PATCH+20,4B300000+M17(0).   SW  F00 12/03/80 004-007 #32229
:GENMD,ANALZ PATCH+21,4B300002+PPO5(0).  SW  F00 12/03/80 005-007 #32229
:GENMD,ANALZ PATCH+22,680008D0+PPO5(0).  SW  F00 12/03/80 006-007 #32229
:GENMD,ANALZ PATCH+23,1C000000(0).       SW  F00 12/03/80 007-007 #32229
< CP5DUMP GETS CREATED IN CURRENT ACCOUNT, FIX OPEN FPT           #32128
< TO OPEN INPUT CP5DUMP IN CURRENT ACCOUNT                        #32128
:GENMD,ANALZ PP+320,02000002(02010202).  JBC F00 12/03/80 001-001 #32128
< INCREASE ALLOWED REPLACEMENT COMMANDS TO 470 WORDS, INSTEAD     #32661
< OF 470 BYTES. GENMD TO BATCH:                                   #32661
:GENMD,BATCH BATCH2DD+499,758(1D6).      FHK F00 12/03/80 001-001 #32661
< INVALID PUNCH CAN CAUSE CCI TO LOOP                             #32804
< JOB CANNOT BE X'D OR ABORTED                                    #32804
:GENMD JOBP+DD,680000C5+CCIPCH(680000D0+JOBP).   12/04/80 001-004 #32804
:GENMD CCIPCH+C5,21800015.               JBC F00 12/04/80 002-004 #32804
:GENMD CCIPCH+C6,683000DE+JOBP.          JBC F00 12/04/80 003-004 #32804
:GENMD CCIPCH+C7,680000D0+JOBP.          JBC F00 12/04/80 004-004 #32804
< CONTROL MISFORMATS DISPLAYS AND REVISIONS OF MINQX, MAXQX IN    #32794
< MULTI-CPU SYSTEMS. GENMD TO CONTROL:                            #32794
,+AC73,1(0).                             RMS F00 12/03/80 001-006 #32794
,+AC74,1(0).                             RMS F00 12/03/80 002-006 #32794
,+AC75,10000(8000).                      RMS F00 12/03/80 003-006 #32794
,+AC76,10000(8000).                      RMS F00 12/03/80 004-006 #32794
,+AC77,1(0).                             RMS F00 12/03/80 005-006 #32794
,+AC78,1(0).                             RMS F00 12/03/80 006-006 #32794
< THIS GENMD TO CONTROL FIXES A WEE TIMING WINDOW WHERE CONTROL   #32738
< CAN CHANGE PL:CHG WITHOUT CHECKING PL:LK. IF RBBAT FINDS THE    #32738
< CHANGED VALUE THERE AT THE WRONG TIME, RBBAT WILL GET AN        #32738
< A4-04 ON A 560, OR A LATER MBS SCREECH 2C-00 ON SIGMA.          #32738
:GENMD,CONTROL +B129,68000000+PATCH(47510000+PL:CHG).     001-005 #32738
:GENMD,CONTROL PATCH+0,32810000+PL:LK.   GAF F00 12/05/80 002-005 #32738
:GENMD,CONTROL PATCH+1,69300000+PATCH.   GAF F00 12/05/80 003-005 #32738
:GENMD,CONTROL PATCH+2,47510000+PL:CHG.  GAF F00 12/05/80 004-005 #32738
:GENMD,CONTROL PATCH+3,6800B12A.         GAF F00 12/05/80 005-005 #32738
< FILL WILL REQUEST A SECOND TAPE (AND KEEP THE FIRST TAPE FOREVER#32699
< ON BACKUPS, IF HE GETS A 1400 TYPE ERROR ON THE FIRST FILE HE   #32699
< TRIES TO OPEN (WILL ALSO BE FIRST FILE HE IS TRYING TO PUT      #32699
< ON TAPE ).                                                      #32699
:GENMD,FILL BACKUP+427,6AB00010+PATCH(6AB00154+BACKUP).   001-003 #32699
:GENMD,FILL PATCH+11,68000154+BACKUP.    JBC F00 04/23/80 003-003 #32699
< FIX FORTRAN MULTIPLE DUMMY PROBLEM                              #32561
:GENMD,PASS0F #PATCH,028FCCC5(0),;       RC  F00 01/02/80 001-006 #32561
:             021AA2F0(0),;              RC  F00 01/02/80 002-006 #32561
:             2451A344(0),;              RC  F00 01/02/80 003-006 #32561
:             02480028(0),;              RC  F00 01/02/80 004-006 #32561
:             0003B285(0).               RC  F00 01/02/80 005-006 #32561
:GENMD,PASS2F #PASS2F+FAD,40000+#PATCH(410E3+#PASS2F).    006-006 #32561
< IN CASE OF MULTIPLE FAILURES ON THE OPEN OF THE DISKPOOL        #32722
< FILE, FOR THE FSAVE 'STATS' OPTION, FSAVE CAN END UP IN         #32722
< A LOOP AT AROUND .BD90.                                         #32722
< AS FSAVE'S PATCH AREA WAS CONSUMED BY X32600 AND X32291, THE    #32722
< UNRELATED MESSAGE " ***FIT DISC ADDRESS IN FILE DIRECTORY       #32722
< KEY***" HAS BEEN SHORTENED TO " FIT DA ERROR IN FD KEY"         #32722
< TO MAKE ROOM FOR A PSEUDO PATCH AREA.                           #32722
< GENMDS TO FSAVE.                                                #32722
,FSTART+D7C,32200008(72F0000A).          RMS F00 12/03/80 001-027 #32722
,FSTART+D7D,72F0000A(21F00003).          RMS F00 12/03/80 002-027 #32722
,FSTART+D7E,21F00003(69300D85+FSTART).   RMS F00 12/03/80 003-027 #32722
,FSTART+D7F,69300F97+FSTART(33E00081+DATASEC).   12/03/80 004-027 #32722
,FSTART+D80,22100F97+FSTART(04100079+DATASEC).   12/03/80 005-027 #32722
,FSTART+D81,3510007B+DATASEC(04100E3C+FSTART).   12/03/80 006-027 #32722
,FSTART+D82,4610007C+DATASEC(33200081+DATASEC).  12/03/80 007-027 #32722
,FSTART+D83,33E00081+DATASEC(04100079+DATASEC).  12/03/80 008-027 #32722
,FSTART+D84,04100079+DATASEC(E8000008).  RMS F00 12/03/80 009-027 #32722
,FSTART+D85,04100E3C+FSTART(22F00000).   RMS F00 12/03/80 010-027 #32722
,FSTART+D86,33200081+DATASEC(35F00100+DATASEC).  12/03/80 011-027 #32722
,FSTART+D87,04100079+DATASEC(22F00F09+FSTART).   12/03/80 012-027 #32722
,FSTART+D88,3510007B+DATASEC(04200E70+FSTART).   12/03/80 013-027 #32722
,FSTART+D89,68000F9C+FSTART(E8000008).   RMS F00 12/03/80 014-027 #32722
,FSTART+F91,1740C6C9(3140405C).          RMS F00 12/03/80 015-027 #32722
,FSTART+F92,E340C4C1(5C5CC6C9).          RMS F00 12/03/80 016-027 #32722
,FSTART+F93,40C5D9D9(E340C4C9).          RMS F00 12/03/80 017-027 #32722
,FSTART+F94,D6D940C9(E2C340C1).          RMS F00 12/03/80 018-027 #32722
,FSTART+F95,D540C6C4(C4C4D9C5).          RMS F00 12/03/80 019-027 #32722
,FSTART+F96,40D2C5E8(E2E240C5).          RMS F00 12/03/80 020-027 #32722
,FSTART+F97,22F00000(D9D9D6D9).          RMS F00 12/03/80 021-027 #32722
,FSTART+F98,35F00100+DATASEC(40C9D540).  RMS F00 12/03/80 022-027 #32722
,FSTART+F99,22F00F09+FSTART(C6C9D3C5).   RMS F00 12/03/80 023-027 #32722
,FSTART+F9A,04200E70+FSTART(40C4C9D9).   RMS F00 12/03/80 024-027 #32722
,FSTART+F9B,E8000002(C5C3E3D6).          RMS F00 12/03/80 025-027 #32722
,FSTART+F9C,3510007C+DATASEC(D9E840D2).  RMS F00 12/03/80 026-027 #32722
,FSTART+F9D,E8000002(C5E84040).          RMS F00 12/03/80 027-027 #32722
< FSAVE SOMETIMES OVER-REACTS TO LARGE, HEAVILY UPDATED KEYED     #32291
< FILES, AND REPORTS RCBERR. USER SHOULD MAKE A VISUAL RECORD     #32291
< COUNT CHECK WHEN THAT HAPPENS, BUT MULTIPLE SNAPS ARE AN        #32291
< OVERKILL. THIS GENMD CHANGES THOSE RCBERRORS TO 'FILE MAY       #32291
< BE PARTIAL'. **NOTE: THIS PATCH SHOULD NOT BE INSTALLED WITHOUT #32291
< 122-CARD X32600.                                                #32291
,FSTART+4F9,6A00005A+FPATCH(6A000581+FSTART).F00 03/21/80 001-010 #32291
,FPATCH+5B,69300581+FSTART.              RMS F00 03/21/80 003-010 #32291
,FPATCH+5C,330006BA+DATASEC.             RMS F00 03/21/80 004-010 #32291
,FPATCH+5D,69300581+FSTART.              RMS F00 03/21/80 005-010 #32291
,FPATCH+5E,3210000F.                     RMS F00 03/21/80 006-010 #32291
,FPATCH+5F,22F00FBC+FSTART.              RMS F00 03/21/80 007-010 #32291
,FPATCH+60,04200E70+FSTART.              RMS F00 03/21/80 008-010 #32291
,FPATCH+61,32F00001.                     RMS F00 03/21/80 009-010 #32291
,FPATCH+62,680004FA+FSTART.              RMS F00 03/21/80 010-010 #32291
<< FIX ERROR HANDLING AT EOT BETTER.                              #32600
< RE-INITIALIZE BYTE COUNTER AND EOR ERROR FLAG WHEN RESTARTING   #32600
< A FILE ON A NEW REEL.                                           #32600
,FSTART+89A,68000000+FPATCH(02200000).   RMS F00 11/14/79 001-122 #32600
,FPATCH+00,356000B5+DATASEC.             RMS F00 11/14/79 002-122 #32600
,FPATCH+01,356006D1+DATASEC.             RMS F00 11/14/79 003-122 #32600
,FPATCH+02,02200000.                     RMS F00 11/14/79 004-122 #32600
,FPATCH+03,6800089B+FSTART.              RMS F00 11/14/79 005-122 #32600
< MUST CHECK FOR TYC = 5 OR X'13' ON EITHER DATA OR SENTINEL      #32600
< WRITES TO TAPE.                                                 #32600
,EASECT+52,68060062(21100005).           RMS F00 11/14/79 006-122 #32600
,FEAPATCH+00,21100005.                   RMS F00 11/14/79 007-122 #32600
,FEAPATCH+01,68360054.                   RMS F00 11/14/79 008-122 #32600
,FEAPATCH+02,21100013.                   RMS F00 11/14/79 009-122 #32600
,FEAPATCH+03,68360054.                   RMS F00 11/14/79 010-122 #32600
,FEAPATCH+04,68060047.                   RMS F00 11/14/79 011-122 #32600
< HAVE TO CHECK FOR TYC= 5 OR X'13' FOR RANDOM FILES, TOO.        #32600
,FSTART+6C9,68000004+FPATCH(21600005).   RMS F00 11/14/79 012-122 #32600
,FPATCH+04,21600013.                     RMS F00 11/14/79 013-122 #32600
,FPATCH+05,683006CB+FSTART.              RMS F00 11/14/79 014-122 #32600
,FPATCH+06,21600005.                     RMS F00 11/14/79 015-122 #32600
,FPATCH+07,680006CA+FSTART.              RMS F00 11/14/79 016-122 #32600
< CHECK FOR PRIOR DATA ERROR AFTER EOT, EVEN THOUGH CURRENT       #32600
< WRITE, WTM, OR SENTINEL WRITE MAY BE O.K.                       #32600
,FSTART+87E,68000008+FPATCH(B56000A5+DATASEC).   11/14/79 017-122 #32600
,FPATCH+08,330006D1+DATASEC.             RMS F00 11/14/79 018-122 #32600
,FPATCH+09,69300888+FSTART.              RMS F00 11/14/79 019-122 #32600
,FPATCH+0A,B56000A5+DATASEC.             RMS F00 11/14/79 020-122 #32600
,FPATCH+0B,6800087F+FSTART.              RMS F00 11/14/79 021-122 #32600
< WHEN STARTING A NEW REEL AS A RESULT OF ERRORS ON THE LAST      #32600
< REEL, DONT WRITE THE OLD :BOF RECORD, AS THE FILE WILL          #32600
< BE RESTARTED FROM THE BEGINNING.                                #32600
,FSTART+8B8,6800000C+FPATCH(6AF0095F+FSTART).F00 11/14/79 022-122 #32600
,FPATCH+0C,6AF0095F+FSTART.              RMS F00 11/14/79 023-122 #32600
,FPATCH+0D,330006D1+DATASEC.             RMS F00 11/14/79 024-122 #32600
,FPATCH+0E,683008B9+FSTART.              RMS F00 11/14/79 025-122 #32600
,FPATCH+0F,680008C0+FSTART.              RMS F00 11/14/79 026-122 #32600
< FOLLOWING GENMDS CREATE A MECHANISM TO TEST FOR TRUE            #32600
< COMPLETION OF IO OPERATIONS, EVEN IF FSAVE'S COUNT IS WRONG     #32600
< (THE OLD HANG AT EOT CAPER). IF EVEN THE MONITOR'S COUNTDOWN    #32600
< IS INCOMPLETE, FSAVE WILL STILL HANG, ON PURPOSE.               #32600
,FPATCH+10,0.                            RMS F00 11/14/79 027-122 #32600
,FPATCH+12,0.                            RMS F00 11/14/79 029-122 #32600
,FPATCH+13,0.                            RMS F00 11/14/79 030-122 #32600
,FPATCH+14,0F000001.                     RMS F00 11/14/79 031-122 #32600
,FPATCH+15,02200040.                     RMS F00 11/14/79 032-122 #32600
,FPATCH+16,2BF00010+FPATCH.              RMS F00 11/14/79 033-122 #32600
,FPATCH+17,22100093.                     RMS F00 11/14/79 034-122 #32600
,FPATCH+18,22200032.                     RMS F00 11/14/79 035-122 #32600
,FPATCH+19,04800014+FPATCH.              RMS F00 11/14/79 036-122 #32600
,FPATCH+1A,B30200A3+DATASEC.             RMS F00 11/14/79 037-122 #32600
,FPATCH+1B,68300026+FPATCH.              RMS F00 11/14/79 038-122 #32600
,FPATCH+1C,64200019+FPATCH.              RMS F00 11/14/79 039-122 #32600
,FPATCH+1D,06000000.                     RMS F00 11/14/79 040-122 #32600
,FPATCH+1E,32200000+S:CUN.               RMS F00 11/14/79 041-122 #32600
,FPATCH+1F,72240000+UB:MF.               RMS F00 11/14/79 042-122 #32600
,FPATCH+20,68300023+FPATCH.              RMS F00 11/14/79 043-122 #32600
,FPATCH+21,6AF0083A+FSTART.              RMS F00 11/14/79 044-122 #32600
,FPATCH+22,68000018+FPATCH.              RMS F00 11/14/79 045-122 #32600
,FPATCH+23,6AF0083A+FSTART.              RMS F00 11/14/79 046-122 #32600
,FPATCH+24,22300000.                     RMS F00 11/14/79 047-122 #32600
,FPATCH+25,B53200A3+DATASEC.             RMS F00 11/14/79 048-122 #32600
,FPATCH+26,02200040.                     RMS F00 11/14/79 049-122 #32600
,FPATCH+27,2AF00010+FPATCH.              RMS F00 11/14/79 050-122 #32600
,FPATCH+28,E800000F.                     RMS F00 11/14/79 051-122 #32600
< THIS SET HANDLES 5 RETRIES TO GET A GOOD :E0V OR :EOR WRITE.    #32600
< IF FSAVE CAN'T DO IT IN 5 RETRIES, IT WILL ABORT.               #32600
,FPATCH+29,15400011+FPATCH.              RMS F00 11/14/79 052-122 #32600
,FPATCH+2A,22400096.                     RMS F00 11/14/79 053-122 #32600
,FPATCH+2B,22500005.                     RMS F00 11/14/79 054-122 #32600
,FPATCH+2C,B15800A3+DATASEC.             RMS F00 11/14/79 055-122 #32600
,FPATCH+2D,68300037+FPATCH.              RMS F00 11/14/79 056-122 #32600
,FPATCH+2E,20FFFFFD.                     RMS F00 11/14/79 057-122 #32600
,FPATCH+2F,64300037+FPATCH.              RMS F00 11/14/79 058-122 #32600
,FPATCH+30,2212F9A4.                     RMS F00 11/14/79 059-122 #32600
,FPATCH+31,6AF00DF4+FSTART.              RMS F00 11/14/79 060-122 #32600
,FPATCH+32,22F00E5D+FSTART.              RMS F00 11/14/79 061-122 #32600
,FPATCH+33,04200E70+FSTART.              RMS F00 11/14/79 062-122 #32600
,FPATCH+34,221009A1+FSTART.              RMS F00 11/14/79 063-122 #32600
,FPATCH+35,091005D6+DATASEC.             RMS F00 11/14/79 064-122 #32600
,FPATCH+36,6800094C+FSTART.              RMS F00 11/14/79 065-122 #32600
,FPATCH+37,12400011+FPATCH.              RMS F00 11/14/79 066-122 #32600
,FPATCH+38,E800000F.                     RMS F00 11/14/79 067-122 #32600
< IF WRITE ERROR OCCURS, FSAVE MUST CLOSE OUT REEL WITH :EOV,     #32600
< :E0R AND TMS. IF UNABLE TO DO THIS, WITH 5 NEW RETRIES,         #32600
< FSAVE WILL NOW ABORT WITH AN APPROPRIATE MESSAGE.               #32600
,FSTART+93B,68000039+FPATCH(2222A078).   RMS F00 11/14/79 068-122 #32600
,FPATCH+39,6AF00015+FPATCH.              RMS F00 11/14/79 069-122 #32600
,FPATCH+3A,2222A078.                     RMS F00 11/14/79 070-122 #32600
,FPATCH+3B,6800093C+FSTART.              RMS F00 11/14/79 071-122 #32600
,FSTART+93D,6800003C+FPATCH(6AF0095F+FSTART).F00 11/14/79 072-122 #32600
,FPATCH+3C,22300005.                     RMS F00 11/14/79 073-122 #32600
,FPATCH+3E,6AF00015+FPATCH.              RMS F00 11/14/79 075-122 #32600
,FPATCH+3F,6AF00029+FPATCH.              RMS F00 11/14/79 076-122 #32600
,FPATCH+40,6AF00979+FSTART.              RMS F00 11/14/79 077-122 #32600
,FPATCH+41,6AF00015+FPATCH.              RMS F00 11/14/79 078-122 #32600
,FPATCH+42,6800093F+FSTART.              RMS F00 11/14/79 079-122 #32600
,FSTART+942,68000043+FPATCH(2210000C).   RMS F00 11/14/79 080-122 #32600
,FPATCH+43,2210000C.                     RMS F00 11/14/79 081-122 #32600
,FPATCH+44,330000B1+DATASEC.             RMS F00 11/14/79 082-122 #32600
,FPATCH+45,69300943+FSTART.              RMS F00 11/14/79 083-122 #32600
,FPATCH+46,6AF0095F+FSTART.              RMS F00 11/14/79 084-122 #32600
,FPATCH+47,6AF00015+FPATCH.              RMS F00 11/14/79 085-122 #32600
,FPATCH+48,6AF00029+FPATCH.              RMS F00 11/14/79 086-122 #32600
,FPATCH+49,68000944+FSTART.              RMS F00 11/14/79 087-122 #32600
,FSTART+947,68000949+FSTART(22100093).   RMS F00 11/14/79 088-122 #32600
,FSTART+949,6AF00015+FPATCH(69200948+FSTART).F00 11/14/79 089-122 #32600
< CREATE AND MODIFY MESSAGES.                                     #32600
< THE MESSAGE 'TOO MANY ERRORS - FSAVE ABORTS', IF RECEIVED AT    #32600
< END OF TAPE, MEANS THAT FSAVE COULD NOT WRITE HIS :EOV          #32600
< AND :EOR SENTINELS AS PART OF REEL-SWITCH RECOVERY.             #32600
< THE RECEIVER OF THIS MESSAGE SHOULD EITHER NOT USE THAT REEL    #32600
< FOR FSAVE, OR SHOULD MOVE THE EOT REFLECTIVE MARK A FEW FEET    #32600
< TOWARD THE FRONT OF THE TAPE. NOTE THAT MOST TAPE CLEANERS      #32600
< DO NOT CLEAN BEYOND EOT.                                        #32600
,FSTART+E58,13C3C1D5,E340D9E4.           RMS F00 11/14/79 090-122 #32600
,FSTART+E5A,D56B404C,40F540D7.           RMS F00 11/14/79 091-122 #32600
,FSTART+E5C,C1C7C5E2,22E3D6D6.           RMS F00 11/14/79 092-122 #32600
,FSTART+E5E,40D4C1D5,E840E3C1.           RMS F00 11/14/79 093-122 #32600
,FSTART+E60,D7C540C5,D9D9D6D9.           RMS F00 11/14/79 094-122 #32600
,FSTART+E62,E26B40C6,E2C1E5C5.           RMS F00 11/14/79 095-122 #32600
,FSTART+E64,40C1C2D6,D9E3E240.           RMS F00 11/14/79 096-122 #32600
,FSTART+EE2,1EE3C1D7,C540C5D9.           RMS F00 11/14/79 097-122 #32600
,FSTART+EE4,D9D6D940,6040D7D6.           RMS F00 11/14/79 098-122 #32600
,FSTART+EE6,E2E2C9C2,D3C540C2.           RMS F00 11/14/79 099-122 #32600
,FSTART+EE8,C1C440C6,C9D3C540.           RMS F00 11/14/79 100-122 #32600
,FSTART+FBC,215C5CC6,D6D3D3D6.           RMS F00 11/14/79 101-122 #32600
,FSTART+FBE,E6C9D5C7,40C6C9D3.           RMS F00 11/14/79 102-122 #32600
,FSTART+FC0,C540D4C1,E840C2C5.           RMS F00 11/14/79 103-122 #32600
,FSTART+FC2,40D7C1D9,E3C9C1D3,5C5C4040.  RMS F00 11/14/79 104-122 #32600
< IF CP-V GIVES UP ON INCONSISTENT STATUS OR LOST POSITION,       #32600
< FSAVE SHOULDNT PLAY HERO, BUT SHOULD GIVE UP, TOO.              #32600
,FSTART+88D,6800004A+FPATCH(22600000).   RMS F00 11/14/79 105-122 #32600
,FPATCH+4A,22600008.                     RMS F00 11/14/79 106-122 #32600
,FPATCH+4B,B16000A5+DATASEC.             RMS F00 11/14/79 107-122 #32600
,FPATCH+4C,68300050+FPATCH.              RMS F00 11/14/79 108-122 #32600
,FPATCH+4D,22600009.                     RMS F00 11/14/79 109-122 #32600
,FPATCH+4E,B16000A5+DATASEC.             RMS F00 11/14/79 110-122 #32600
,FPATCH+4F,69300058+FPATCH.              RMS F00 11/14/79 111-122 #32600
,FPATCH+50,22100096.                     RMS F00 11/14/79 112-122 #32600
,FPATCH+51,B26200A3+DATASEC.             RMS F00 11/14/79 113-122 #32600
,FPATCH+52,21600013.                     RMS F00 11/14/79 114-122 #32600
,FPATCH+54,21600005.                     RMS F00 11/14/79 116-122 #32600
,FPATCH+55,69300058+FPATCH.              RMS F00 11/14/79 117-122 #32600
,FPATCH+56,330006D1+DATASEC.             RMS F00 11/14/79 118-122 #32600
,FPATCH+57,68300030+FPATCH.              RMS F00 11/14/79 119-122 #32600
,FPATCH+58,22600000.                     RMS F00 11/14/79 120-122 #32600
,FPATCH+59,6800088E+FSTART.              RMS F00 11/14/79 121-122 #32600
< FSAVE SHOULD NOT LEAVE REELS OPEN WHEN HE'S DONE, EVEN IF HE IS #32600
< RUNNING ONLINE.                                                 #32600
,FSTART+94D,02000000(6980094F+FSTART).   RMS F00 11/14/79 122-122 #32600
< LABEL PROCESSOR MUST REWIND TAPES IN HOTAVR SYSTEMS.            #32757
< WILL GENERATE PATCH SPACE BY GETTING RID OF THE LITTLE          #32757
< MESSAGE "BAD CONTROL CARD", NOP THE M:PRINT AND USE MESSAGE     #32757
< FOR PATCH SPACE                                                 #32757
:GENMD START+12,02000000(0420A000).      JBC F00 12/03/80 001-012 #32757
<                                                                 #32757
< BUILD A M:REW *0 INTO THE M:PRINT FPT                           #32757
<                                                                 #32757
:GENMD +A000,0410A001.                   JBC F00 12/03/80 002-012 #32757
:GENMD +A001,90000001.                   JBC F00 12/03/80 003-012 #32757
<                                                                 #32757
< REWIND ON THE LABEL COMMAND                                     #32757
<                                                                 #32757
:GENMD START+53,68000637+INITPGM(321005BA+INITPGM).       004-012 #32757
:GENMD INITPGM+637,22100000+F:TAPOT.     JBC F00 12/03/80 005-012 #32757
:GENMD INITPGM+638,6700A000.             JBC F00 12/03/80 006-012 #32757
:GENMD INITPGM+639,321005BA+INITPGM.     JBC F00 12/03/80 007-012 #32757
:GENMD INITPGM+63A,68000054+START.       JBC F00 12/03/80 008-012 #32757
<                                                                 #32757
< NOW FOR THE PRINT COMMAND                                       #32757
<                                                                 #32757
:GENMD START+149,6800063B+INITPGM(6800014B+START).        009-012 #32757
:GENMD INITPGM+63B,22100000+F:TAPIN.     JBC F00 12/03/80 010-012 #32757
:GENMD INITPGM+63C,6700A000.             JBC F00 12/03/80 011-012 #32757
:GENMD INITPGM+63D,6800014B+START.       JBC F00 12/03/80 012-012 #32757
< LEMUR REPORTS 'ILLEGAL ROM LANGUAGE' WHEN IT FINDS AN           #32771
< X'19' LOAD CODE. X'19'(NEW FOR F00) IS FOR ROOT DUMMY           #32771
< SECTION. ANSFORT C00 CREATES SOME X'19' CODES, 'THO             #32771
< ANSFORT B08 (& EARLIER) AND FORTIV CREATED X'09'FROM            #32771
< THE SAME SOURCE CODE. FOLLOWING GENMD TO LEMUR MAKES            #32771
< X'19' LEGAL.                                                    #32771
,SCANROM+42,6802001D+SCANROM(6800B9A3).  RMS F00 12/03/80 001-001 #32771
< 'ILLEGAL ROM LANGUAGE' CAUSED BY LOAD ABSOLUTE 16 BYTES.        #32287
< LEMUR DOES NOT TREAT ZERO BYTE COUNT (X'40') AS 16. IT          #32287
< THEREFORE PROCESSES THE DATA AS CONTROL BYTES                   #32287
,SCANROM+23,68000060+PATCH(4B600000+XF). GH  F00 01/02/80 001-003 #32287
,PATCH+60,4B600000+XF,69300024+SCANROM.  GH  F00 01/02/80 002-003 #32287
,PATCH+62,22600010,68000024+SCANROM.     GH  F00 01/02/80 003-003 #32287
< SEVERITY LEVEL 4 BY LOADER IF TWO BLOCK DATA SUBPROGRAMS ARE    #32280
< INPUT TO THE SAME LOAD MODULE, BUT NO CORRESPONDING DDEF MESSAGE#32280
< REASON IS THAT FORTRAN CREATES AN EXTERNAL DEFINITION '4 BLOCK' #32280
< PROBLEM DID NOT OCCUR WITH PREVIOUS RELEASES OF CP-V. WITH ANSFO#32280
< ROMS ONE GETS SEVERITY LEVEL 4 AND DDEF FOR 4 BLOCK.            #32280
PS1,MCP1+7E2,680000F1+PATCH(22600004).   FHK F00 01/02/80 001-004 #32280
LDR,PATCH+F1,3260000F,02200020,2A6C0003,116000F8+PATCH.   002-004 #32280
LDR,PATCH+F5,683007E8+MCP1,22600004,680007E3+MCP1.        003-004 #32280
LDR,PATCH+F8,06F4C2D3,D6C3D240.          FHK F00 01/02/80 004-004 #32280
< **** WARNING*****                                               #32565
< THIS GENMD RELATES TO THE FACT THAT YOU SHOULD !!NEVER!!        #32565
< MAKE ASSUMPTIONS ON M:READ/WRITE PARAMETERS.  YOU SHOULD        #32565
< ALWAYS SPECIFY BUF,SIZE AND BTD IN THE FPT                      #32565
<                            JBC                                  #32565
<                                                                 #32565
< MANY PROGRAMS ASSUME THAT M:UC INITIALLY HAS A BTD OF ZERO.     #32565
< HOWEVER, NOT TRUE WHEN A PROGRAM IS CALLED VIA AUTOCALL.  A     #32565
< BTD OF 1 LEFT OVER FROM LOGON.  THE FOLLOWING GENMDS FIX LOGON  #32565
< SO IT LEAVES WITH BTD=0.                                        #32565
:GENMD SECTION1+22E,6800026C+SECTION3(22000000). 12/03/80 001-006 #32565
:GENMD SECTION3+26C,221D7ECF(0).         CS  F00 12/03/80 002-006 #32565
:GENMD SECTION3+26D,4A100000+M:UC(0).    CS  F00 12/03/80 003-006 #32565
:GENMD SECTION3+26E,35100000+M:UC(0).    CS  F00 12/03/80 004-006 #32565
:GENMD SECTION3+26F,22000000(0).         CS  F00 12/03/80 005-006 #32565
:GENMD SECTION3+270,6800022F+SECTION1(0).CS  F00 12/03/80 006-006 #32565
< ALLOW OLTEST TO RUN WITHOUT A PATCH FILE.                       #32725
:GENMD,OLMON +A521,21B00301(21B00300).   GG  F00 05/23/80 001-001 #32725
< PCL GETS IO ERROR 1500 ON A LIST COMMAND IF M:LO IS             #32808
< ASSIGNED TO A JOB FILE (IE -  SET M:LO/FID;JOB)                 #32808
:GENMD PCL+F2,02000000(6AB0014A+PCL).    JBC F00 12/04/80 001-001 #32808
< PCL COPYALL WITH (PHY) OPTION FAILS AFTER A COPY 'INTO'         #32705
< WHEN EITHER THE EI OR EO FILE DIDN'T EXIST. FOLLOWING           #32705
< GENMDS TO PCL FIX THE PROBLEM.                                  #32705
,CLOSEO+4,68000021+PATCH(21100002).      RMS F00 12/03/80 001-005 #32705
,PATCH+21,22100001.                      RMS F00 12/03/80 002-005 #32705
,PATCH+22,351E0056.                      RMS F00 12/03/80 003-005 #32705
,PATCH+23,32100000+M:EO.                 RMS F00 12/03/80 004-005 #32705
,PATCH+24,68000005+CLOSEO.               RMS F00 12/03/80 005-005 #32705
< WHEN REMOVING AN ANS TAPE IN BATCH, PCL RETURNS A STEP          #32616
< CONDITION OF 2. IT SHOULD BE 0.                                 #32616
,REW+5E,68300025+PATCH(6830006C+REW).    JH  F00 12/03/80 001-003 #32616
,PATCH+25,35A0004E+BREAK.                JH  F00 12/03/80 002-003 #32616
,PATCH+26,6800006C+REW.                  JH  F00 12/03/80 003-003 #32616
< PIGEON SENDS ONE BLANK TOO FEW WHEN REPOSITIONING CURSOR        #32787
< AND LENGTH OF LAST MESSAGE WAS LESS THAN PREVIOUS CURSOR        #32787
< POSITION. GENMD TO PIGEON.                                      #32787
:GENMD,PIGEON PIGPP+1B3,69100003+PATCH(691001B9+PIGPP).   001-003 #32787
:GENMD,PIGEON PATCH+3,207FFFFF.          FHK F00 12/05/80 002-003 #32787
:GENMD,PIGEON PATCH+4,680001B9+PIGPP.    FHK F00 12/05/80 003-003 #32787
< WHEN INITIATED BY A SEND KEYIN, PIGEON WILL NOT EXIT BUT GOES   #32420
< INTO A WAIT LOOP.  THE FOLLOWING WILL ALWAYS FORCE AN EXIT.     #32420
:GENMD,PIGEON PIGPP+13,68000018+PIGPP(68400018+PIGPP).    001-001 #32420
< PATCH OF O4/10/79 FOR SIDR #27817 STILL DOES NOT FIX THE        #32564
:GENMD,RBBAT MBSOP+1D0,2140000E(2140000F).   F00 01/02/80 001-002 #32564
:GENMD,RBBAT MBSOP+1D1,681001DD+MBSOP(681001DF+MBSOP).    002-002 #32564
< THESE GENMDS CORRECT BYTE 0 IN R6 RETURNING FROM TRT, WHICH     #32606
< CAUSED  MSG TO BE INCORRECTLY CHECKED FOR LENGTH > 52.          #32606
,RBG+451,680000F0+RBBP(38600050+SDAA).   BF  F00 01/02/80 001-003 #32606
,RBBP+F0,22100000,75100006,38600050+SDAA.BF  F00 01/02/80 002-003 #32606
,RBBP+F3,68000452+RBG.                   BF  F00 01/02/80 003-003 #32606
< INCORRECT CODE IN TEL SETAMR ALLOWS !SET M:C TO WORK IN BATCH.  #32482
,RESET+5DC,116805F0+RESET(116805EE+RESET).   F00 01/02/80 001-005 #32482
,RESET+5E2,03D47AC3(04D47AE4).           GH  F00 01/02/80 002-005 #32482
,RESET+5E3,40404040(C3404040).           GH  F00 01/02/80 003-005 #32482
,RESET+5EE,04047AE4(03D47AC3).           GH  F00 01/02/80 004-005 #32482
,RESET+5EF,C3404040(40404040).           GH  F00 01/02/80 005-005 #32482
< IF THE PLATEN COMMAND WITHOUT PARAMETERS IS USED IMMEDIATELY    #32182
< AFTER RUNNING TEXT (OR ANY OTHER PROCESSOR THAT SETS DRC FOR    #32182
< M:UC), THE DISPLAY IS MISALIGNED. TESTED FIX;                   #32182
:GENMD,TEL TEL+83E,00404040(40404040).   FHK F00 01/02/80 001-002 #32182
:GENMD,TEL TEL+847,0D004040(0D404040).   FHK F00 01/02/80 002-002 #32182
< ESC-D AT TEL PROMPT AFTER PROGRAM ABORT MAY ECHO GARBAGE OR NOTH#32496
< TEL FAILES TO MOVE J:CCBUF BACK TO IT'S READ BUFFER IN THIS CASE#32496
< SOMETIMES, ACCOUNT NAMES, FILE NAMES, OR ANY SORT OF GARBAGE THE#32496
< FROM BEFORE MAY ECHO.                                           #32496
,TEL+A71,68000020+TEL(6800002C+TEL).     GH  F00 01/02/80 001-001 #32496
< MAKE VOLINIT HANDLE LARGE HGP SYSTEMS                           #32494
,VOLINIT+A6E,0+AVRID(200+HGP).           GH  F00 01/04/80 001-001 #32494
< MAKE VOLINIT HANDLE LARGE HGP SYSTEMS (E02)                     #32494
,VOLINIT+A78,0+AVRID(200+HGP).           GH  F00 01/04/80 001-001 #32494
< ONLINE VOLINIT OF PRIVATE PACK MISCALCULATES NUMBER OF          #32550
< CYLINDERS TO RESERVE .                                          #32550
,VOLINIT+18A,2130001E(2120001E).         RMS F00 01/02/80 001-001 #32550
*********************** SST 12-80 ****************************
*********************** SST 11-80 ****************************
10/31/80
< NOTE: THE CONDITIONAL SYMBOLS '#ELLAF00' AND '#ELLAF01', MENTIONED
< EARLIER, HAVE NOW BEEN INSERTED IN THE GENMD ELLA SECTION OF
< F00PATCH.
< ***********
10/27/80
< REPLACEMENT PATCH FOR SIDR # 32238 DATED 06/05/79.              #32238
< CURE NEW DUPLICATED-BLOCK PROBLEMS AND FAILURE TO SUSPEND.      #32238
< PREVENT DUPLICATE PRINT BLOCKS ON PRINTER OUTPUT WHEN THE       #32238
< PRINTER SUSPBIT IS SET AND ANOTHER RECORD IS SENT TO ANY OTHER  #32238
< OUTPUT DEVICE.                                                  #32238
#HASPIO                                  TSM F00 10/23/80 001-042 #32238
UMOV/HASPIO+.1FC/OR,10 @(AI,10 .2000)/   TSM F00 10/23/80 002-042 #32238
/@/.2080/                                TSM F00 10/23/80 003-042 #32238
UMOV/HASPIO+.31F/CI,10 .80(CI,10 .B00)/  TSM F00 10/23/80 004-042 #32238
UMOV/HASPIO+.320/BANZ $+4(BANZ *8)/      TSM F00 10/23/80 005-042 #32238
UMOV/HASPIO+.323/B @(AW,10 11)/          TSM F00 10/23/80 006-042 #32238
/@/CI,10 .B00/                           TSM F00 10/23/80 007-042 #32238
/@/BANZ *8/                              TSM F00 10/23/80 008-042 #32238
/@/OR,10 11/                             TSM F00 10/23/80 009-042 #32238
/@/BDR,11 HASPIO+.332/                   TSM F00 10/23/80 010-042 #32238
UMOV/HASPIO+.324/AI,10 -.80(AI,3 0)/     TSM F00 10/23/80 012-042 #32238
UMOV/HASPIO+.325/OR,10 11(BLZ ;Q)/       TSM F00 10/23/80 013-042 #32238
UMOV/HASPIO+.230/B $+6(LW,1 .1C,6)/      TSM F00 10/23/80 014-042 #32238
UMOV/HASPIO+.280/B $+2(LW,14 ;Q)/        TSM F00 10/23/80 015-042 #32238
UMOV/HASPIO+.282/LI,4 0(STW,14 .16,6)/   TSM F00 10/23/80 016-042 #32238
UMOV/HASPIO+.28C/CI,10 .80(CI,10 .2000)/ TSM F00 10/23/80 017-042 #32238
UMOV/. 1/B @(BAZ HASPIO+.11B)/           TSM F00 10/23/80 018-042 #32238
/@/BAZ HASPIO+.11B/                      TSM F00 10/23/80 019-042 #32238
/@/AI,10 -.80/                           TSM F00 10/23/80 020-042 #32238
/@/CI,10 .2000/                          TSM F00 10/23/80 021-042 #32238
/@/BANZ HASPIO+.28E/                     TSM F00 10/23/80 022-042 #32238
/@/EOR,10 BITS+13/                       TSM F00 10/23/80 023-042 #32238
/@/STH,10 STH:FLG,4/                     TSM F00 10/23/80 024-042 #32238
/@/B HASPIO+.11B/                        TSM F00 10/23/80 025-042 #32238
UMOV/BSCIO .115/B @(OR,15 .16,6/         TSM F00 10/23/80 026-042 #32238
/@/LH,10 STH:FLG,4/                      TSM F00 10/23/80 027-042 #32238
/@/CI,10 .1000/                          TSM F00 10/23/80 028-042 #32238
/@/BAZ .+2/                              TSM F00 10/23/80 029-042 #32238
/@/OR,15 BITS+25/                        TSM F00 10/23/80 030-042 #32238
/@/B BSCIO .116/                         TSM F00 10/23/80 031-042 #32238
<                                                                 #32238
UMOV/HASPIO .C1/.FFFFDEFF(.FFFFCEFF/     TSM F00 10/23/80 032-042 #32238
UMOV/HASPIO .1CE/B @(STW,12 .18,6/       TSM F00 10/23/80 033-042 #32238
/@/STW,12 .18,6/                         TSM F00 10/23/80 034-042 #32238
/@/WD,0 .37/                             TSM F00 10/23/80 035-042 #32238
/@/OR,8 BITS+8/                          TSM F00 10/23/80 037-042 #32238
/@/STH,8 STH:FLG,4/                      TSM F00 10/23/80 038-042 #32238
/@/WD,0 .27/                             TSM F00 10/23/80 039-042 #32238
/@/B HASPIO .1CF/                        TSM F00 10/23/80 040-042 #32238
UMOV/HASPIO .285/B $+2(LW,4 .1D,6/       TSM F00 10/23/80 041-042 #32238
#                                        TSM F00 10/23/80 042-042 #32238
10/27/80
#L6GC00                                  DGH C00 10/06/80 001-019 #32575
< AT LONG LAST THE REASON FOR SPORADIC 7E-40 CRASHES HAS BEEN FOUN#32575
<THE L6R MODULE HAS BEEN RE-ENTERED WHEN IT WAS NEVER DESIGNED TO #32575
<MAKE THE L6R MODULE RE-ENTERABLE                                 #32575
< AND CLEAN UP 1 PATH FOR L6G CALLING UNMAPPED HANDLER.           #32575
<                                                                 #32575
<    15 LINES TO L6R (MONITOR ROOT) AND 4 LINES TO L6G(GENMD'S)   #32575
<                                                                 #32575
<                                                                 #32575
< THE SCENARIO BEHIND THE CRASH IS AS FOLLOWS:                    #32575
<   1) THE L6G ROUTINES CALL THE UNMAPPED HANDLER FOR SERVICE.    #32575
<   2) THE UNMAPPED HANDLER DECIDES IS MUST REPORT AN EVENT FOR   #32575
<     SOME USER ( UNBLOCK TS USER, AWAKEN L6G) AND ENTERS SSS.    #32575
<   3) SSS ENABLES THE INTERRUPTS, AND A FECP INTERRUPT COMES IN. #32575
<   4) THE FECP HAS JUST SENT IN A CHARACTER, AND THE UNMAPPED HAN#32575
<      LETS THE COC INPUT PROCESSING DO ITS THING VIA THE ENABLE  #32575
<      AT CPAGE+.AF ( IN THE C00 VERSION)                         #32575
<    5) THE COC ROUTINES MAKE ANOTHER CALL TO THE UNMAPPED HANDLER#32575
<       THE UNMAPPED HANDLER HAS JUST BEEN RE-ENTERED, WIPING OUT #32575
<      THE SAVED PSD STORED IN STEP 1).                           #32575
<                                                                 #32575
<                                                                 #32575
< SAVE THE EXIT POINTS PSD IN THE TSTACK                          #32575
/L6R+.E1/B @(STD,0 L6R+.EE/              DGH C00 10/06/80 002-019 #32575
/@/LCI 2/                                DGH C00 10/06/80 003-019 #32575
/@/PSM,0 TSTACK/                         DGH C00 10/06/80 004-019 #32575
/@/B L6R+.E2/                            DGH C00 10/06/80 005-019 #32575
< RESTORE THE EXIT POINT PSD                                      #32575
/L6R+.E5/B @(STCF L6R+.EE/               DGH C00 10/06/80 006-019 #32575
/@/STCF 2/                               DGH C00 10/06/80 007-019 #32575
/@/LCI 2/                                DGH C00 10/06/80 008-019 #32575
/@/PLM,0 TSTACK/                         DGH C00 10/06/80 009-019 #32575
/@/LCF 2/                                DGH C00 10/06/80 010-019 #32575
/@/STCF 0/                               DGH C00 10/06/80 011-019 #32575
/@/WD,0 .37/                             DGH C00 10/06/80 012-019 #32575
/@/STD,0 L6R+.EE/                        DGH C00 10/06/80 013-019 #32575
/@/B L6R+.E6/                            DGH C00 10/06/80 014-019 #32575
#                                        DGH C00 10/06/80 015-019 #32575
#L6GC00                                  DGH C00 10/06/80 016-019 #32575
< CONTINUATION OF PATCHES. THIS SECTION HAS FOUR LINES TO L6G     #32575
,L6G+2A2,21D0000C(21D00008).             DGH C00 10/06/80 017-019 #32575
,L6G+2AC,22F0000C(22F00008).             DGH C00 10/06/80 018-019 #32575
#                                        DGH C00 10/06/80 019-019 #32575
*********************** SST 10-80 ****************************
*********************** SST 09-80 ****************************
08/28/80************
< NOTE: CONDITIONAL SYMBOLS 'ELLAF00' AND 'ELLAF01' HAVE BEEN
< INSTALLED IN THE PATCH FILES TO HANDLE THE NEW (F01) VERSION
< OF ELLA, RELEASED ON THE SEPTEMBER SST.
*********************** SST 08-80 ****************************
07/20/80
< MAKE PCL REVIEW ON A FECP WORK BETTER. USE A MORE COMPREHENSIVE #32745
< CHECK FOR TYPEAHEAD BECAUSE THE FECP NEVER BUFFERS IN CPV MEMORY#32745
<                                                                 #32745
,PATCH+18,0.                             DGH F00 07/14/80 001-011 #32745
<                                                                 #32745
<SAVE THE STATUS WORD CONTAINING TYPEAHEAD IN THE PATCH AREA.     #32745
,LIST+97,68000019+PATCH(25800003).       DGH F00 07/14/80 002-011 #32745
,PATCH+19,25800003.                      DGH F00 07/14/80 003-011 #32745
,PATCH+1A,35900018+PATCH.                DGH F00 07/14/80 004-011 #32745
,PATCH+1B,68000098+LIST.                 DGH F00 07/14/80 005-011 #32745
< DO OLD CHECK FOR TYPEAHEAD (COCOC COUNT>0), THEN CHECK TYPEAHEAD#32745
,LIST+B7,6800001C+PATCH(684000C0+LIST).  DGH F00 07/14/80 006-011 #32745
,PATCH+1C,694000B8+LIST.                 DGH F00 07/14/80 007-011 #32745
,PATCH+1D,32600018+PATCH.                DGH F00 07/14/80 008-011 #32745
,PATCH+1E,21600100.                      DGH F00 07/14/80 009-011 #32745
,PATCH+1F,694000B8+LIST.                 DGH F00 07/14/80 010-011 #32745
,PATCH+20,680000C0+LIST.                 DGH F00 07/14/80 011-011 #32745
*********************** SST 07-80 ****************************
06/30/80
< REPLACEMENT PATCH FOR PATCH OF SAME NUMBER DATED 02/11/80.      #32652
< ALSO, NOTE THAT THIS PATCH WAS MISPLACED INTO THE GENMD         #32652
< SECTION OF 'F00PATCH'.                                          #23652
< INDEX REGISTER MIXUP ON LINE 545 OF THE L6R MODULE ..           #32652
< REGISTERS 2 AND 3 ARE INTERCHANGED  ( AFFECTS TP ONLY)          #32652
#L6GC00                                  DGH C00 06/30/80 001-006 #32652
/L6R .9A/EXU L6R .22(LI,2 ;Q/            DGH C00 06/30/80 002-006 #32652
/L6R .9B/CLM,2 COD:LPC,3(CLM,3 COD:LPC,2/DGH C00 06/30/80 003-006 #32652
/L6R .9D/BDR,3 L6R+.9B(BDR,2 L6R+.9B/    DGH C00 06/30/80 004-006 #32652
/L6R+.9E/EXU L6R+.26(LC ;Q,2/            DGH C00 06/30/80 005-006 #32652
#                                        DGH C00 06/30/80 006-006 #32652
*********************** SST 06-80 ****************************
05/08/80
<REPLACEMENT PATCH FOR #32098 DATED 09/04/79 WHICH MUST BE        #32593
<REMOVED. THIS VERSION FIXES ERRONEOUS ERROR MESSAGE WHEN DATA    #32593
<SEGSIZE IS AN EXACT MULTIPLE OF PAGES.  30 CARDS TO STEPOVR.     #32593
<    Security problem - users can re-write load module HEAD       #32593
<    record and get write access to their DCBs.                   #32593
STEPOVR/STPNR+.5D8/B @ (LB,7 .9000/      DCP F00 04/30/80 001-030 #32593
/@/LI,10 .31/                            DCP F00 04/30/80 002-030 #32593
/@/LW,6 .8D14/                           DCP F00 04/30/80 003-030 #32593
/@/CW,6 .8D15/                           DCP F00 04/30/80 004-030 #32593
/@/BG @+6/                               DCP F00 04/30/80 005-030 #32593
/@/LD,6 .8D1C/                           DCP F00 04/30/80 006-030 #32593
/@/CLM,6 .8D14/                          DCP F00 04/30/80 007-030 #32593
/@/BCR,9 STPNR+.AAC/                     DCP F00 04/30/80 008-030 #32593
/@/CLM,7 .8D14/                          DCP F00 04/30/80 009-030 #32593
/@/BCR,9 STPNR+.AAC/                     DCP F00 04/30/80 010-030 #32593
/@/LB,7 .9000/                           DCP F00 04/30/80 011-030 #32593
/@/B STPNR+.5D9/                         DCP F00 04/30/80 012-030 #32593
< Check for data (00) overlapping DCB (10). Users can             #32593
< get write access to DCBs by changing TREE record in LM.         #32593
STEPOVR/STPNR+.57F/B @(LW,7 LITERALS+.21/DCP F00 04/30/80 013-030 #32593
#HBUF=.9000                              DCP F00 04/30/80 014-030 #32593
/@/LW,1 HBUF+.19/                        DCP F00 04/30/80 015-030 #32593
/@/LI,6 .FFFF/                           DCP F00 04/30/80 016-030 #32593
/@/AND,1 6/                              DCP F00 04/30/80 017-030 #32593
/@/SLS,1 1/                              DCP F00 04/30/80 018-030 #32593
/@/LW,6 HBUF+.15/                        DCP F00 04/30/80 019-030 #32593
/@/SLD,6 -16/                            DCP F00 04/30/80 020-030 #32593
/@/SLS,7 -16/                            DCP F00 04/30/80 021-030 #32593
/@/AW,6 7/                               DCP F00 04/30/80 022-030 #32593
/@/SLS,6 1/                              DCP F00 04/30/80 023-030 #32593
/@/CW,1 6/                               DCP F00 04/30/80 024-030 #32593
/@/BGE @+3/                              DCP F00 04/30/80 025-030 #32593
/@/LI,10 .38/                            DCP F00 04/30/80 026-030 #32593
/@/B STPNR+.AAC/                         DCP F00 04/30/80 027-030 #32593
/@/LW,7 LITERALS+.21/                    DCP F00 04/30/80 028-030 #32593
/@/B STPNR+.580/                         DCP F00 04/30/80 029-030 #32593
#HBUF;K1                                 DCP F00 04/30/80 030-030 #32593
*********************** SST 05-80 ****************************
*********************** SST 04-80 ****************************
****************
03/20/80
< 03/28/79.                                                       #32219
< PREVENT SC 7E-40 WHEN RBBAT RUNS OUT OF SN SPACE                #32219
,RBBP+E2,09A00000+TMPSTK(0).             FJ  F00 03/18/80 001-004 #32219
,RBBP+E3,680007F9+RBG(0).                FJ  F00 03/18/80 002-004 #32219
,RBG+D5E,6AB000E2+RBBP(6AB007F9+RBG).    FJ  F00 03/18/80 003-004 #32219
,RBG+D61,08B00000+TMPSTK(32B0000A).      FJ  F00 03/18/80 004-004 #32219
< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 06/13/79             #31918
<PREVENT DUPLICATE INTERNAL SYMBOL NAMES WHEN ONE FOLLOWS ANOTHER.#31918
EVL,MCEV+2A6,68000045+PATCH(88700000).   DGH F00 03/18/80 001-011 #31918
LDR,PATCH+44,3FFFFFFF.                   DGH F00 03/18/80 002-011 #31918
LDR,PATCH+45,32A60000.                   DGH F00 03/18/80 003-011 #31918
LDR,PATCH+46,32B00044+PATCH.             DGH F00 03/18/80 004-011 #31918
LDR,PATCH+47,32160001.                   DGH F00 03/18/80 005-011 #31918
LDR,PATCH+48,88700000.                   DGH F00 03/18/80 006-011 #31918
LDR,PATCH+49,45A60003.                   DGH F00 03/18/80 007-011 #31918
LDR,PATCH+4A,693002A7+MCEV.              DGH F00 03/18/80 008-011 #31918
LDR,PATCH+4B,31160004.                   DGH F00 03/18/80 009-011 #31918
LDR,PATCH+4C,693002A7+MCEV.              DGH F00 03/18/80 010-011 #31918
LDR,PATCH+4D,6800026F+MCEV.              DGH F00 03/18/80 011-011 #31918
< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 09/04/79             #32098
<    Security problem - users can re-write load module HEAD       #32098
<    record and get write access to their DCBs.                   #32098
STEPOVR/STPNR+.5D8/B @ (LB,7 .9000/      DCP F00 03/18/80 001-030 #32098
/@/LI,10 .31/                            DCP F00 03/18/80 002-030 #32098
/@/CW,6 .8D15/                           DCP F00 03/18/80 004-030 #32098
/@/BG @+6/                               DCP F00 03/18/80 005-030 #32098
/@/LD,6 .8D1C/                           DCP F00 03/18/80 006-030 #32098
/@/CLM,6 .8D14/                          DCP F00 03/18/80 007-030 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 03/18/80 008-030 #32098
/@/CLM,7 .8D14/                          DCP F00 03/18/80 009-030 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 03/18/80 010-030 #32098
/@/LB,7 .9000/                           DCP F00 03/18/80 011-030 #32098
/@/B STPNR+.5D9/                         DCP F00 03/18/80 012-030 #32098
< Check for data (00) overlapping DCB (10). Users Can             #32098
< get write access to DCBs by changing TREE record in LM          #32098
<                                                                 #32098
STEPOVR/STPNR+.57F/B @(LW,7 LITERALS+.21/DCP F00 03/18/80 013-030 #32098
#HBUF=.9000                              DCP F00 03/18/80 014-030 #32098
/@/LW,1 HBUF+.19/                        DCP F00 03/18/80 015-030 #32098
/@/LI,6 .FFFF/                           DCP F00 03/18/80 016-030 #32098
/@/AND,1 6/                              DCP F00 03/18/80 017-030 #32098
/@/SLS,1 1/                              DCP F00 03/18/80 018-030 #32098
/@/LW,6 HBUF+.15/                        DCP F00 03/18/80 019-030 #32098
/@/SLD,6 -16/                            DCP F00 03/18/80 020-030 #32098
/@/SLS,7 -16/                            DCP F00 03/18/80 021-030 #32098
/@/AW,6 7/                               DCP F00 03/18/80 022-030 #32098
/@/SLS,6 1/                              DCP F00 03/18/80 023-030 #32098
/@/CW,1 6/                               DCP F00 03/18/80 024-030 #32098
/@/BGE @+3/                              DCP F00 03/18/80 025-030 #32098
/@/LI,10 .38/                            DCP F00 03/18/80 026-030 #32098
/@/B STPNR+.AAC/                         DCP F00 03/18/80 027-030 #32098
/@/LW,7 LITERALS+.21/                    DCP F00 03/18/80 028-030 #32098
/@/B STPNR+.580/                         DCP F00 03/18/80 029-030 #32098
#HBUF;K1                                 DCP F00 03/18/80 030-030 #32098
*******************
03/07/80
< NOTE: ARRANGEMENT OF CONDITIONAL SYMBOL PATCHES IN THE L6G AREA
<       HAS BEEN CHANGED FOR BETTER READABILITY AND CONSISTENCY.
***************
03/03/80
#L6GC00
< INDEX REGISTER MIXUP ON LINE 545 OF THE L6R MODULE ..           #32652
< REGISTERS 2 AND 3 ARE INTERCHANGED  ( AFFECTS TP ONLY)          #32652
/L6R .9A/EXU L6R .22(LI,2 ;Q/            DGH C00 02/11/80 001-004 #32652
/L6R .9B/CLM,2 COD:LPC,3(CLM,3 COD:LPC,2/DGH C00 02/11/80 002-004 #32652
/L6R .9D/BDR,3 L6R+.9B(BDR,2 L6R+.9B/    DGH C00 02/11/80 003-004 #32652
/L6R+.9E/EXU L6R+.26(LC ;Q,2/            DGH C00 02/11/80 004-004 #32652
#
*********************** SST 03-80 ****************************
*********************** SST 02-80 ****************************
01/16/80
<*** THIS PATCH REPLACES ONE DATED 08/28/79 ***                   #32443
<*** THE MISSING CONDITIONALS HAVE BEEN ADDED ***                 #32443
<KEEP ORIGINAL SCREECH CODE ON SC 78.                             #32443
#NSCPU                                   MSC F00 01/15/80 001-003 #32443
/SCHDSUB+.69/STH,4 2(STH,1 2/            MSC F00 01/15/80 002-003 #32443
#                                        MSC F00 01/15/80 003-003 #32443
<*** THIS PATCH REPLACES ONE DATED 08/28/79 ***                   #32442
<*** THE MISSING CONDITIONALS HAVE BEEN ADDED ***                 #32442
<SFAULT SHOULD USE CORRECT REGISTER FOR LRA                       #32442
/SFAULT+.B7/LRA,2 0(LRA,7 0/             MSC F00 01/15/80 002-003 #32442
#                                        MSC F00 01/15/80 003-003 #32442
<*** THIS PATCH REPLACES ONE DATED 08/28/79 ***                   #32446
<*** THE MISSING CONDITIONALS HAVE BEEN ADDED ***                 #32446
<CORRECT ADDRESS OF ERROR LOG BUFFER  FOR SLAVE FAULT SHUTDOWN    #32446
#NSCPU                                   MSC F00 01/15/80 001-006 #32446
/SFAULT+.F5/B @(SLS,2 9/                 MSC F00 01/15/80 002-006 #32446
/@/SLS,2 9/                              MSC F00 01/15/80 003-006 #32446
/@/LI,0 TCATCH+.A4/                      MSC F00 01/15/80 004-006 #32446
/@/B SFAULT+.F6/                         MSC F00 01/15/80 005-006 #32446
#                                        MSC F00 01/15/80 006-006 #32446
***********************
01/10/80
<LET CPV DO THE ERROR CORRECTION ON RMP DISC DRIVES.             #32567
<THE 560 RMP ERROR CORRECTION WAS NOT ALWAYS DOING A GOOD JOB.   #32567
<MOVE THE ERROR CORRECTION BACK INTO CPV WHERE IT RESIDES FOR    #32567
<OTHER DRIVES. TO GET THE FULL BENIFIT OF THIS PATCH YOU         #32567
<SHOULD REALLY RESTORE A COMPLETE FILE SYSTEM ON FRESHLY         #32567
<VOLINITED PACKS.                                                #32567
#X560                                    DGH F00 10/29/79 001-016#32567
UMOV/HANDLERS .204/@+;Q(.2000000/        DGH F00 10/29/79 002-016#32567
UMOV/HANDLERS .205/.200+;Q(.1E800200/    DGH F00 10/29/79 003-016#32567
/@/AI,9 .200/                            DGH F00 10/29/79 004-016#32567
<CHECK FOR DISC PACK                                             #32567
/@/CI,10 HANDLERS .1EB/                  DGH F00 10/29/79 005-016#32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 006-016#32567
<CHECK FOR RMP DISC                                              #32567
/@/LB,5 DCT22,1/                         DGH F00 10/29/79 007-016#32567
/@/LW,11 NSPT,5/                         DGH F00 10/29/79 008-016#32567
/@/CI,11 .C/                             DGH F00 10/29/79 009-016#32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 010-016#32567
/@/LW,11 NTPC,5/                         DGH F00 10/29/79 011-016#32567
/@/CI,11 .13/                            DGH F00 10/29/79 012-016#32567
/@/BNE HANDLERS .C5/                     DGH F00 10/29/79 013-016#32567
<ITS AN RMP, MAKE ORDER CODE X'42'                               #32567
/@/OR,8 LITERALS+.22/ Y4                 DGH F00 10/29/79 014-016#32567
/@/B HANDLERS .C5/                       DGH F00 10/29/79 015-016#32567
#                                        DGH F00 10/29/79 016-016#32567
*********************** SST 01-80 ****************************
*********************** SST 12-79 ****************************
11/26/79
<SFAULT SHOULD USE CORRECT REGISTER FOR LRA                       #32442
/SFAULT+.B7/LRA,2 0(LRA,7 0/             MSC F00 08/28/79 001-001 #32442
11/26/79
<KEEP ORIGINAL SCREECH CODE ON SC 78.                             #32443
/SCHDSUB+.69/STH,4 2(STH,1 2/            MSC F00 08/28/79 001-001 #32443
11/26/79
<CORRECT ADDRESS OF ERROR LOG BUFFER  FOR SLAVE FAULT SHUTDOWN    #32446
/SFAULT+.F5/B @(SLS,2 9/                 MSC FOO 08/28/79 001-004 #32446
/@/SLS,2 9/                              MSC FOO 08/28/79 002-004 #32446
/@/LI,0 TCATCH+.A4/                      MSC FOO 08/28/79 003-004 #32446
/@/B SFAULT+.F6/                         MSC FOO 08/28/79 004-004 #32446
11/26/79
<MAKE BATCH ACCEPT CMDS WITH M:LINK IN GHOST MODE                 #32495
*********************** SST 11-79 ****************************
*********************** SST 10-79 ****************************
****************************
< 10/4/79                                                         #32289
< NOTE: SIDR#32289, DATED 10/2/79, IS TURNED ON BY SETTING        #32289
<       SYMBOL X560=1.                                            #32289
****************************
10/2/79
< A NEW (AND BETTER) VERSION OF VOLINIT HAS REPLACED THE          #32289
< VERSION WHICH HAS BEEN ON THE TAPE THE LAST TWO MONTHS.         #32289
< FILE NAMES ARE AS FOLLOWS: UP:VOLINIT, BO:VOLINIT, DIAG.
< REPLACEMENT PATCH FOR SAME SIDR DATED 7/6/79                    #32289
<THESE PATCHES ARE SOME OF THE SOLUTIONS TO THE RMP PROBLEM       #32289
< WITH VOLINIT                                                    #32289
<                                                                 #32289
<      NOTE:                                                      #32289
<                                                                 #32289
<             THIS PATCH IS ONLY NEEDED ON 560S.                  #32289
<             TO IMPLEMENT THIS PATCH, TURN THE X560 SWITCH ON    #32289
<                                                                 #32289
<                        #X560=1                                  #32289
<                                                                 #32289
<             AT THE BEGINNING OF THE PATCH DECK.                 #32289
#X560                                    DGH F00 10/02/79 001-057 #32289
RMAOV/FISH+.5BB/LD,12 DCT13,3(LCI 0/     DGH F00 10/02/79 002-057 #32289
RMAOV/FISH+.5BC/LC DCT20,3(TDV,12 *15/   DGH F00 10/02/79 003-057 #32289
RMAOV/FISH .5BF/TIO,12 *15(HIO,12 *15/   DGH F00 10/02/79 004-057 #32289
RMAOV/FISH .3AB/B @(STW,9 DCT9,2/        DGH F00 10/02/79 005-057 #32289
/@/STW,9 DCT9,2/                         DGH F00 10/02/79 006-057 #32289
/@/LH,1 DCT23,2/                         DGH F00 10/02/79 007-057 #32289
/@/BE FISH .3AC/                         DGH F00 10/02/79 008-057 #32289
/@/LB,1 DCT22,2/                         DGH F00 10/02/79 009-057 #32289
/@/LW,8 NSPT,1/                          DGH F00 10/02/79 010-057 #32289
/@/CI,8 .C/                              DGH F00 10/02/79 011-057 #32289
/@/BNE FISH .3AC/                        DGH F00 10/02/79 012-057 #32289
/@/LW,8 NTPC,1/                          DGH F00 10/02/79 013-057 #32289
/@/CI,8 .13/                             DGH F00 10/02/79 014-057 #32289
/@/BNE FISH .3AC/                        DGH F00 10/02/79 015-057 #32289
/@/LB,1 DCT2,2/                          DGH F00 10/02/79 016-057 #32289
/@/LW,9 LITERALS .23/                    DGH F00 10/02/79 017-057 #32289
/@/STS,9 CIT4,1/                         DGH F00 10/02/79 018-057 #32289
/@/B FISH .3AC/                          DGH F00 10/02/79 019-057 #32289
<M:DCLOSE RESETS BIT IN CIT4 WHEN ALL DEVICES ARE NOT IN DIAG MODE#32289
RMAOV/FISH .46C/B @(STW,8 DCT9,2/        DGH F00 10/02/79 020-057 #32289
/@/STW,8 DCT9,2/                         DGH F00 10/02/79 021-057 #32289
/@/LH,5 DCT23,2/                         DGH F00 10/02/79 022-057 #32289
/@/BE FISH .46D/                         DGH F00 10/02/79 023-057 #32289
/@/LB,5 DCT22,2/                         DGH F00 10/02/79 024-057 #32289
/@/LW,8 NSPT,5/                          DGH F00 10/02/79 025-057 #32289
/@/CI,8 .C/                              DGH F00 10/02/79 026-057 #32289
/@/BNE FISH .46D/                        DGH F00 10/02/79 027-057 #32289
/@/LW,8 NTPC,5/                          DGH F00 10/02/79 028-057 #32289
/@/CI,8 .13/                             DGH F00 10/02/79 029-057 #32289
/@/BNE FISH .46D/                        DGH F00 10/02/79 030-057 #32289
/@/LI,5 DCTSIZ/                          DGH F00 10/02/79 031-057 #32289
/@/LB,8 DCT2,2/                          DGH F00 10/02/79 032-057 #32289
/@/CB,8 DCT2,5/                          DGH F00 10/02/79 033-057 #32289
/@/BNE . 3/                              DGH F00 10/02/79 034-057 #32289
/@/INT,9 DCT9,5/                         DGH F00 10/02/79 035-057 #32289
/@/BCS,2 FISH .46D/                      DGH F00 10/02/79 036-057 #32289
/@/BDR,5 .-5/                            DGH F00 10/02/79 037-057 #32289
/@/LB,5 DCT2,2/                          DGH F00 10/02/79 038-057 #32289
/@/LW,8 CIT4,5/                          DGH F00 10/02/79 039-057 #32289
/@/AND,8 LITERALS .62/                   DGH F00 10/02/79 040-057 #32289
/@/STW,8 CIT4,5/                         DGH F00 10/02/79 041-057 #32289
/@/B FISH .46D/                          DGH F00 10/02/79 042-057 #32289
#                                        DGH F00 10/02/79 043-057 #32289
#X560                                    DGH F00 10/02/79 044-057 #32289
<CONTINUATION OF PATCHES FOR VOLINIT PROBLEM                      #32289
< UMOV OVERLAY ...                                                #32289
UMOV/HANDLERS+.1EA/B @(BAL,10 HANDLERS+.BD/  F00 10/02/79 045-057 #32289
/@/LH,6 DCT1,1/                          DGH F00 10/02/79 046-057 #32289
/@/TIO,8 0,6/                            DGH F00 10/02/79 047-057 #32289
/@/BCS,12 IOQ .E8/                       DGH F00 10/02/79 048-057 #32289
/@/LI,10 HANDLERS+.1EB/                  DGH F00 10/02/79 049-057 #32289
/@/B HANDLERS+.BD/                       DGH F00 10/02/79 050-057 #32289
<DONT DO PRE-SEEKS WHEN A RMP DEVICE ON CONTROLLER IS IN DIAG MODE#32289
/@/LB,5 DCT2,1/                          DGH F00 10/02/79 052-057 #32289
/@/MTW,0 CIT4,5/                         DGH F00 10/02/79 053-057 #32289
/@/BGE HANDLERS .C5/                     DGH F00 10/02/79 054-057 #32289
/@/AND,4 LITERALS .62/                   DGH F00 10/02/79 055-057 #32289
/@/B HANDLERS .C5/                       DGH F00 10/02/79 056-057 #32289
#                                        DGH F00 10/02/79 057-057 #32289
10/02/79
< REPLACEMENT PATCHES FOR THOSE WITH SAME SIDR NUMBER             #31662
< DATED 07/23/79.                                                 #31662
< THE OBJECT OF THESE PATCHES IS TO IMPROVE MULTI-PROCESSOR       #31662
< PERFORMANCE BY SCHEDULING USERS AS MUCH AS POSSIBLE ON          #31662
< THE SLAVE CPUS, THEREBY FREEING THE MASTER TO GIVE BETTER       #31662
< RESPONSE TIME. CONCURRENTLY WITH THIS, USERS WHO ISSUE          #31662
< EITHER AN M:SYS,M:MASTER, OR M:CAL WITH A MASTER MODE PSD       #31662
< WILL BE BLOCKED ON THE MASTER CPU BY SETTING THE MASTER         #31662
< PERMANENT BIT IN UB:MPFLG. THIS BIT WILL ONLY BE                #31662
< RESET AT JOB STEP TIME IN ORDER TO PROTECT AS MUCH AS           #31662
< POSSIBLE USERS WHO RUN IN MASTER MODE. THIS MEANS THAT          #31662
< A USER WANTING TO RUN ON A SLAVE CPU IN MASTER MODE             #31662
< MUST DO SO EXPRESSLY BY RESETTING THAT BIT HIMSELF.             #31662
< THIS BIT WILL BE RESET AT STEP TIME, DURING                     #31662
< USER RUNDOWN, BUT ONLY AFTER PMD'S AND OTHER                    #31662
< DEBUGGING HAS BEEN DONE                                         #31662
< IN ADDITION TO THIS PERFORMANCE IMPROVEMENT PATCH,              #31662
< THE ETMF FOR MP SYSTEMS WILL NOW BE CALCULATED TO REFLECT       #31662
< CP-6 PRESENTLY USES, THAT IS TO SAY:                            #31662
< NEW ETMF=(OLD ETMF + #MEXEC + (#SEXEC/#CPUS))/2                 #31662
< WHERE    #MEXEC IS THE NUMBER OF USERS THAT CAN ONLY            #31662
<                 EXECUTE ON THE MASTER                           #31662
<          #SEXEC IS THE NUMBER OF USERS THAT CAN EXECUTE         #31662
<                 ON ANY OF THE CPUS                              #31662
<          #CPUS  IS THE NUMBER OF CURRENTLY ACTIVE CPUS          #31662
< THE ALGORITHM FOR SINGLE CPUS OR MP SYSTEMS WITH ONLY           #31662
< ONE ACTIVE CPU WILL REMAIN AS BEFORE.                           #31662
<                                                                 #31662
< THESE PATCHES CONSIST OF 36 LINES TO ROOT                       #31662
<                           10 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           42 LINES TO UMOV                      #31662
< CORRECT ETMF ALGORITHM FOR MP SYSTEMS                           #31662
#C:ETM=LITERALS+.CB                      MSC F00 09/04/79 001-097 #31662
#NSCPU                                   MSC F00 09/04/79 002-097 #31662
/PM .72/B @(LW,6 C:ETM/                  MSC F00 09/04/79 003-097 #31662
/@/LI,2 NSCPU/                           MSC F00 09/04/79 004-097 #31662
/@/LI,6 1/                               MSC F00 09/04/79 005-097 #31662
/@/MTB,0 SB:STATE,2/                     MSC F00 09/04/79 006-097 #31662
/@/BEZ . 2/                              MSC F00 09/04/79 007-097 #31662
/@/AI,6 1/                               MSC F00 09/04/79 008-097 #31662
/@/BDR,2 .-3/                            MSC F00 09/04/79 009-097 #31662
/@/LW,3 C:ETM/                           MSC F00 09/04/79 010-097 #31662
/@/B PM .73/                             MSC F00 09/04/79 012-097 #31662
/PM .76/B @(AI,6 1/                      MSC F00 09/04/79 013-097 #31662
/@/LC UB:MPFLG,2/                        MSC F00 09/04/79 014-097 #31662
/@/BCS,12 . 3/                           MSC F00 09/04/79 015-097 #31662
/@/AI,3 1/                               MSC F00 09/04/79 016-097 #31662
/@/B PM .77/                             MSC F00 09/04/79 017-097 #31662
/@/AW,3 6/                               MSC F00 09/04/79 018-097 #31662
/@/B PM .77/                             MSC F00 09/04/79 019-097 #31662
/PM .7C/B @(SLS,6 -1/                    MSC F00 09/04/79 020-097 #31662
/@/SLS,6 1/                              MSC F00 09/04/79 021-097 #31662
/@/DW,3 6/                               MSC F00 09/04/79 022-097 #31662
/@/B PM .7D/                             MSC F00 09/04/79 023-097 #31662
/PM .7D/LW,6 3(AI,6 0/                   MSC F00 09/04/79 024-097 #31662
< SET MASTER PERM BIT FOR M:MASTER,M:SYS                          #31662
/ALTCP .C5/B @ .1(B ALTCP .160/          MSC F00 09/04/79 025-097 #31662
/ALTCP .306/B @(B ALTCP .160/            MSC F00 09/04/79 026-097 #31662
/@/LI,1 1/                               MSC F00 09/04/79 027-097 #31662
/@/LW,4 S:CUN/                           MSC F00 09/04/79 028-097 #31662
/@/WD,0 .37/                             MSC F00 09/04/79 029-097 #31662
/@/LB,2 UB:MPFLG,4/                      MSC F00 09/04/79 030-097 #31662
/@/SLS,1 6/                              MSC F00 09/04/79 031-097 #31662
/@/OR,2 1/                               MSC F00 09/04/79 032-097 #31662
/@/STB,2 UB:MPFLG,4/                     MSC F00 09/04/79 033-097 #31662
/@/WD,0 .27/                             MSC F00 09/04/79 034-097 #31662
#C:ETM;K1                                MSC F00 09/04/79 036-097 #31662
#NSCPU                                   MSC F00 09/04/79 037-097 #31662
< THESE PATCHES CONSIST OF 36 LINES TO ROOT                       #31662
<                           10 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           42 LINES TO UMOV                      #31662
< IMPROVE MP PERFOMANCE CONTINUED                                 #31662
< SET MASTER PERM BIT ON M:CAL (MASTER OR MASTER PROT.)           #31662
LDLNK/LNKTRC+.68D/B  @(B LNKTRC .4A9/    MSC F00 09/04/79 038-097 #31662
/@/LW,1 S:CUN/                           MSC F00 09/04/79 039-097 #31662
/@/WD,0 .37/                             MSC F00 09/04/79 040-097 #31662
/@/LB,4 UB:MPFLG,1/                      MSC F00 09/04/79 041-097 #31662
/@/OR,4 LITERALS .A/                     MSC F00 09/04/79 042-097 #31662
/@/STB,4 UB:MPFLG,1/                     MSC F00 09/04/79 043-097 #31662
/@/WD,0 .27/                             MSC F00 09/04/79 044-097 #31662
/@/B LNKTRC .4A9/                        MSC F00 09/04/79 045-097 #31662
#                                        MSC F00 09/04/79 046-097 #31662
#NSCPU                                   MSC F00 09/04/79 047-097 #31662
< THESE PATCHES CONSIST OF 36 LINES TO ROOT                       #31662
<                           10 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           42 LINES TO UMOV                      #31662
< IMPROVE MP PERFORMANCE CONTINUED                                #31662
< RESET MASTER PERM BIT IN MPFLG AT USER RUNDOWN                  #31662
STEPOVR/STPNR .17C/B @(LW,7 LITERALS .1A/MSC F00 09/04/79 048-097 #31662
/@/LB,7 UB:MPFLG,4/                      MSC F00 09/04/79 049-097 #31662
/@/AND,7 . 4/                            MSC F00 09/04/79 050-097 #31662
/@/STB,7 UB:MPFLG,4/                     MSC F00 09/04/79 051-097 #31662
/@/LW,7 LITERALS .1A/                    MSC F00 09/04/79 052-097 #31662
/@/B STPNR .17D/                         MSC F00 09/04/79 053-097 #31662
/@/.BF/                                  MSC F00 09/04/79 054-097 #31662
#                                        MSC F00 09/04/79 055-097 #31662
#WHIP=@                                  MSC F00 09/04/79 056-097 #31662
#NSCPU                                   MSC F00 09/04/79 057-097 #31662
< THESE PATCHES CONSIST OF 36 LINES TO ROOT                       #31662
<                           10 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           42 LINES TO UMOV                      #31662
< IMPROVE MP PERFORMANCE CONTINUED                                #31662
< THIS PART OF THE PATCH MUST BE PLACED IN                        #31662
< THE UMOV OVERLAY BECAUSE IT REFERS TO SWPSCED,                  #31662
< A LABEL IN THE UMOV OVERLAY.                                    #31662
/@/STH,2 TSTACK+1/                       MSC F00 09/04/79 058-097 #31662
/@/MTW,0 TCATCH .74/                     MSC F00 09/04/79 059-097 #31662
/@/BNEZ SCHED .3A3/                      MSC F00 09/04/79 060-097 #31662
/@/LW,2 LITERALS .1B/                    MSC F00 09/04/79 061-097 #31662
/@/CW,2 TSTACK 2/                        MSC F00 09/04/79 062-097 #31662
/@/BAZ SCHED .3A3/                       MSC F00 09/04/79 063-097 #31662
/@/CW,4 S:CUN/                           MSC F00 09/04/79 064-097 #31662
/@/BNE SCHED .3A3/                       MSC F00 09/04/79 065-097 #31662
/@/BCS,12 SCHED .3A3/                    MSC F00 09/04/79 067-097 #31662
/@/LB,2 UB:MPFLG,4/                      MSC F00 09/04/79 068-097 #31662
/@/AND,2 LITERALS .4A/                   MSC F00 09/04/79 069-097 #31662
/@/STB,2 UB:MPFLG,4/                     MSC F00 09/04/79 070-097 #31662
/@/MTW,0 SB:MPSW/                        MSC F00 09/04/79 071-097 #31662
/@/BEZ SCHED .3A3/                       MSC F00 09/04/79 072-097 #31662
/@/LC SSDAT .12/                         MSC F00 09/04/79 073-097 #31662
/@/BCS,8 SCHED .3A3/                     MSC F00 09/04/79 074-097 #31662
/@/LI,2 19/                              MSC F00 09/04/79 075-097 #31662
/@/MSP,2 TSTACK/                         MSC F00 09/04/79 076-097 #31662
/@/LW,2 JIT/                             MSC F00 09/04/79 077-097 #31662
/@/BEZ . 15/                             MSC F00 09/04/79 078-097 #31662
/@/LI,1 NSCPU-1/                         MSC F00 09/04/79 079-097 #31662
/@/MTW,0 S:PCUN+1,1/                     MSC F00 09/04/79 080-097 #31662
/@/BE . 3/                               MSC F00 09/04/79 081-097 #31662
/@/BDR,1  .-2/                           MSC F00 09/04/79 082-097 #31662
/@/B SCHED .43/                          MSC F00 09/04/79 083-097 #31662
/@/AI,1 1/                               MSC F00 09/04/79 084-097 #31662
/@/MTB,0 SB:MPSW,1/                      MSC F00 09/04/79 085-097 #31662
/@/BEZ SCHED .43/                        MSC F00 09/04/79 086-097 #31662
/@/STW,4 S:PCUN,1/                       MSC F00 09/04/79 087-097 #31662
/@/LI,0 0/                               MSC F00 09/04/79 088-097 #31662
/@/STB,0 SB:MPSW,1/                      MSC F00 09/04/79 089-097 #31662
/@/BAL,1 UNMAP/                          MSC F00 09/04/79 090-097 #31662
/@/BAL,11 SWPSCED/                       MSC F00 09/04/79 091-097 #31662
/@/B SCHED .C5/                          MSC F00 09/04/79 092-097 #31662
/@/BAL,0 SCHED .2B/                      MSC F00 09/04/79 093-097 #31662
/@/B SCHED .39B/                         MSC F00 09/04/79 094-097 #31662
/SCHED .3A2/B WHIP(STH,2 TSTACK 1/       MSC F00 09/04/79 095-097 #31662
/SCHED .3A0/BE WHIP 1(BE SCHED .3A3/     MSC F00 09/04/79 096-097 #31662
#WHIP;K1                                 MSC F00 09/04/79 097-097 #31662
10/02/79
<REPLACEMENT PATCH FOR 31 CARD PATCH DATED 05/29/79.  THIS        #32348
<REPLACEMENT PATCH FIXES THE BUG WHICH CAUSED SC/19 ON ANY KIND OF#32348
<ERROR WHEN DOING THE M:BLIST CAL.                                #32348
#MAXW=58                                 DGH F00 08/27/79 001-041 #32348
/@@/JLIM!TSTACK/                         DGH F00 08/27/79 002-041 #32348
/@/.8DFF/                                DGH F00 08/27/79 003-041 #32348
RMAOV/FISH .2B1/B @(BE . 2/              DGH F00 08/27/79 004-041 #32348
/@/BE FISH .2B3/                         DGH F00 08/27/79 005-041 #32348
/@/CLM,14 JLIM/                          DGH F00 08/27/79 006-041 #32348
/@/BCS,9 FISH .2B2/                      DGH F00 08/27/79 007-041 #32348
/@/LI,11 -MAXW/                          DGH F00 08/27/79 008-041 #32348
/@/MSP,11 TSTACK/                        DGH F00 08/27/79 009-041 #32348
/@/B FISH .2B3/                          DGH F00 08/27/79 010-041 #32348
#JLIM;K1                                 DGH F00 08/27/79 011-041 #32348
RMAOV/FISH .4F5/LI,5 MAXW-1(LI,5 10/     DGH F00 08/27/79 012-041 #32348
RMAOV/FISH+.4F6/PSW,5 TSTACK(BAL,11 ;Q/  DGH F00 08/27/79 013-041 #32348
RMAOV/FISH+.4F7/LW,14 TSTACK(BNE ;Q/     DGH F00 08/27/79 014-041 #32348
RMAOV/FISH .4F8/B FISH .4FB(BDR,5 ;Q/    DGH F00 08/27/79 015-041 #32348
RMAOV/FISH .4FE/MSP,5 TSTACK(BL FISH .4F9/   F00 08/27/79 016-041 #32348
RMAOV/FISH .504/B @(LW,2 *14/            DGH F00 08/27/79 018-041 #32348
/@/LH,2 *14/                             DGH F00 08/27/79 019-041 #32348
/@/CI,2 MAXW MAXW/                       DGH F00 08/27/79 020-041 #32348
/@/BL FISH .505/                         DGH F00 08/27/79 021-041 #32348
/@/LI,2 6/                               DGH F00 08/27/79 022-041 #32348
/@/B FISH .2AB/                          DGH F00 08/27/79 023-041 #32348
RMAOV/FISH+.507/B @(STW,0 *14,2/         DGH F00 08/27/79 024-041 #32348
/@/SCS,0 -1/                             DGH F00 08/27/79 025-041 #32348
/@/STH,0 *14,2/                          DGH F00 08/27/79 026-041 #32348
/@/SCS,0 +1/                             DGH F00 08/27/79 027-041 #32348
/@/B FISH+.508/                          DGH F00 08/27/79 028-041 #32348
RMAOV/FISH .51F/NOP(BGE FISH .2AB/       DGH F00 08/27/79 029-041 #32348
RMAOV/FISH .522/LI,14 -MAXW(LW,14 2,6/   DGH F00 08/27/79 030-041 #32348
RMAOV/FISH+.523/MSP,14 TSTACK(BAL,11 ;Q/ DGH F00 08/27/79 031-041 #32348
RMAOV/FISH+.56B/LH,4 *0(LW,4 *0/         DGH F00 08/27/79 032-041 #32348
RMAOV/FISH+.569/B @(SLS,5 1/             DGH F00 08/27/79 033-041 #32348
/@/LW,11 5/                              DGH F00 08/27/79 034-041 #32348
/@/SLS,5 1/                              DGH F00 08/27/79 035-041 #32348
/@/SLS,11 16/                            DGH F00 08/27/79 036-041 #32348
/@/SAS,11 -16/                           DGH F00 08/27/79 037-041 #32348
/@/B FISH .56A/                          DGH F00 08/27/79 038-041 #32348
RMAOV/FISH+.56C/CH,11 *0,4(CW,5 *0,4/    DGH F00 08/27/79 039-041 #32348
RMAOV/FISH+.581/LH,11 *0(LW,11 *0/       DGH F00 08/27/79 040-041 #32348
#MAXW;K1                                 DGH F00 08/27/79 041-041 #32348
10/02/79
<    record and get write access to their DCBs.                   #32098
STEPOVR/STPNR+.5D8/B @ (LB,7 .9000/      DCP F00 09/04/79 001-030 #32098
/@/LI,10 .31/                            DCP F00 09/04/79 002-030 #32098
/@/LW,6 .8D14/                           DCP F00 09/04/79 003-030 #32098
/@/CW,6 .8D15/                           DCP F00 09/04/79 004-030 #32098
/@/BG @+6/                               DCP F00 09/04/79 005-030 #32098
/@/LD,6 .8D1C/                           DCP F00 09/04/79 006-030 #32098
/@/CLM,6 .8D14/                          DCP F00 09/04/79 007-030 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 09/04/79 008-030 #32098
/@/CLM,7 .8D14/                          DCP F00 09/04/79 009-030 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 09/04/79 010-030 #32098
/@/LB,7 .9000/                           DCP F00 09/04/79 011-030 #32098
/@/B STPNR+.5D9/                         DCP F00 09/04/79 012-030 #32098
< Check for data (00) overlapping DCB (10). Users can             #32098
< get write access to DCBs by changing TREE record in LM.         #32098
<                                                                 #32098
STEPOVR/STPNR+.57F/B @(LW,7 LITERALS+.21/DCP F00 09/04/79 013-030 #32098
#HBUF=.9000                              DCP F00 09/04/79 014-030 #32098
/@/LW,1 HBUF+.19/                        DCP F00 09/04/79 015-030 #32098
/@/LI,6 .FFFF/                           DCP F00 09/04/79 016-030 #32098
/@/AND,1 6/                              DCP F00 09/04/79 017-030 #32098
/@/SLS,1 1/                              DCP F00 09/04/79 018-030 #32098
/@/LW,6 HBUF+.15/                        DCP F00 09/04/79 019-030 #32098
/@/SLD,6 -16/                            DCP F00 09/04/79 020-030 #32098
/@/SLS,7 -16/                            DCP F00 09/04/79 021-030 #32098
/@/AW,6 7/                               DCP F00 09/04/79 022-030 #32098
/@/SLS,6 1/                              DCP F00 09/04/79 023-030 #32098
/@/CW,1 6/                               DCP F00 09/04/79 024-030 #32098
/@/BG @+3/                               DCP F00 09/04/79 025-030 #32098
/@/LI,10 .38/                            DCP F00 09/04/79 026-030 #32098
/@/B STPNR+.AAC/                         DCP F00 09/04/79 027-030 #32098
/@/LW,7 LITERALS+.21/                    DCP F00 09/04/79 028-030 #32098
/@/B STPNR+.580/                         DCP F00 09/04/79 029-030 #32098
#HBUF;K1                                 DCP F00 09/04/79 030-030 #32098
10/02/79
#2780IO                                  DGH F00 06/21/79 001-055 #31663
<ALLOW CPV 2780 SOFTWARE TO RECOVER FROM A PAPER FAULT            #31663
<IN THE REMOTE TERMINAL                                           #31663
<                                                                 #31663
<WHEN A 2780 RUNS OUT OF PAPER, THE 2780 WILL SEND 'EOT' TO CPV   #31663
<    CPV USED TO HANG UP THE LINE WHEN THIS HAPPENED              #31663
<                                                                 #31663
<WITH THESE PATCHES CPV WILL NOW SEND 'ENQ' TO THE REMOTE         #31663
<TERMINAL EVERY 10 SECONDS. CPV ASSUMES THE PRINTER IS            #31663
<READY WHEN THE RESPONSE TO THE 'ENQ' IS 'DLE' 'ACK0'             #31663
<CPV NOW SENDS THE ORIGINAL BLOCK THAT WAS RESPONDED TO WITH      #31663
< 'EOT' BY THE REMOTE TERMINAL.  IF YOU DO NOT HAVE THE 'SINGLE   #31663
< RECORD PER BLOCK OPTION' SET ON THE CPV WORKSTATION DEFINITION  #31663
< AND YOU HAVE A DUMB 2780, YOU WILL PROBABLY GET DUPLICATE       #31663
<PRINT LINES ON THE REMOTE PRINTER. THIS SOFTWARE WAS             #31663
<TESTED WITH A DATA 100 WITH ONE RECORD PER BLOCK.                #31663
<                                                                 #31663
<IF THE RESPONSE TO CPV'S  'ENQ' IS ANOTHER 'ENQ', THE            #31663
<REMOTE TERMINAL IS NOW VIOLATING THE PROTOCOL                    #31663
<AND THE TERMINAL IS DISCONNECTED. (THE REMOTE OPERATOR           #31663
< HAS JUST TRIED TO READ A DECK THRU THE READER.)                 #31663
<                                                                 #31663
<CPV WILL POLL THE REMOTE TERMINAL FOR ABOUT 44 MINUTES, THEN     #31663
<WHEN NO FAVORABLE RESPONSE IS RECEIVED IN THIS TIME, CPV WILL    #31663
<DISCONNECT THE LINE.                                             #31663
<                                                                 #31663
#NEW$FLO=BSCIO+.1F4                      DGH F00 06/21/79 002-055 #31663
#RPT$ORG=BSCIO+.1F3                      DGH F00 06/21/79 003-055 #31663
< ADD 2 NEW DOT TABLE ENTRIES BY MOVING 2 CONSTANTS..             #31663
< XC7 AND MRLPBIT                                                 #31663
< ALSO ADD BRANCH TO PATCH AREA FOR READ AFTER ENQ AFTER EOT      #31663
<                                                                 #31663
UMOV/2780IO+.1F/.43010000(.3B010000/     DGH F00 06/21/79 004-055 #31663
UMOV/2780IO+.20/.3E010107(.36010107/     DGH F00 06/21/79 005-055 #31663
UMOV/2780IO+.21/.3F010207(.37010207/     DGH F00 06/21/79 006-055 #31663
UMOV/2780IO+.22/.3C010309(.34010309/     DGH F00 06/21/79 007-055 #31663
UMOV/2780IO+.23/.42010407(.3A010407/     DGH F00 06/21/79 008-055 #31663
UMOV/2780IO+.24/.3E010507(.36010507/     DGH F00 06/21/79 009-055 #31663
UMOV/2780IO+.25/.3F010607(.37010607/     DGH F00 06/21/79 010-055 #31663
UMOV/2780IO+.26/.40010702(.38010702/     DGH F00 06/21/79 011-055 #31663
UMOV/2780IO+.28/.4402090A(.3C02090A/     DGH F00 06/21/79 013-055 #31663
UMOV/2780IO+.29/.45010A09(.3D010A09/     DGH F00 06/21/79 014-055 #31663
UMOV/2780IO+.2A/.3D010B09(.35010B09/     DGH F00 06/21/79 015-055 #31663
UMOV/2780IO+.2B/.41010C00(.39010C00/     DGH F00 06/21/79 016-055 #31663
UMOV/2780IO+.2C/.3F010D0E(.0A0B0C0D/     DGH F00 06/21/79 017-055 #31663
UMOV/2780IO+.2D/.4001070D(.0E0F1011/     DGH F00 06/21/79 018-055 #31663
UMOV/2780IO+.2E/.0A0B0C0D/               DGH F00 06/21/79 019-055 #31663
UMOV/2780IO+.2F/.0E0F1011(.C7/           DGH F00 06/21/79 020-055 #31663
UMOV/2780IO+.30/.12130000(.20000008/     DGH F00 06/21/79 021-055 #31663
UMOV/2780IO+.49/.01010000/               DGH F00 06/21/79 022-055 #31663
UMOV/2780IO+.4D/.CAF22B00/               DGH F00 06/21/79 023-055 #31663
UMOV/2780IO+.51/.AECECE00/               DGH F00 06/21/79 024-055 #31663
<RESUME NORMAL MODE WITH BLOCK THAT GOT EOT                       #31663
/@/BLAAL!LB,5 IOQ10,3/                   DGH F00 06/21/79 025-055 #31663
/@/STB,5 IOQ11,3/                        DGH F00 06/21/79 026-055 #31663
/@/AND,13 LITERALS+.62/                  DGH F00 06/21/79 027-055 #31663
/@/B RPT$ORG/                            DGH F00 06/21/79 028-055 #31663
<SET # OF TRIES TO 256 FOR TESTING PERIOD=256*10 SEC              #31663
/@/BURP!LI,5 0/                          DGH F00 06/21/79 029-055 #31663
/@/STB,5 IOQ11,3/                        DGH F00 06/21/79 030-055 #31663
< READ INTO RBH:ACK, TIMES OUT IN 4.8 SECS                        #31663
< THEN SEND ENQ VIA NORMAL FOLLOWON                               #31663
< THEN READ FOR RESPONSE                                          #31663
/@/PHOEZE!LI,5 .E/                       DGH F00 06/21/79 031-055 #31663
/@/MTB,-1 IOQ11,3/                       DGH F00 06/21/79 032-055 #31663
/@/B 2780IO .D2/                         DGH F00 06/21/79 034-055 #31663
UMOV/2780IO+.31/B @/                     DGH F00 06/21/79 035-055 #31663
<                                                                 #31663
<JUST GOT RESPONSE FROM REMOTE IN EOT RECOVERY MODE               #31663
/@/LH,5 RBH:ACK,1/                       DGH F00 06/21/79 036-055 #31663
/@/CI,5 .1070/                           DGH F00 06/21/79 037-055 #31663
/@/BE BLAAL/                             DGH F00 06/21/79 038-055 #31663
/@/SLS,5 -8/                             DGH F00 06/21/79 039-055 #31663
/@/CI,5 .2D/                             DGH F00 06/21/79 040-055 #31663
/@/BNE  PHOEZE/                          DGH F00 06/21/79 041-055 #31663
/@/B 2780IO .D2/                         DGH F00 06/21/79 042-055 #31663
<                                                                 #31663
UMOV/2780IO+.13D/AND,15 @(AND,15 2780IO+.2F/ F00 06/21/79 043-055 #31663
/@/.C7/                                  DGH F00 06/21/79 044-055 #31663
UMOV/2780IO+.2C5/CW,13 @(CW,13 2780IO+.30/   F00 06/21/79 045-055 #31663
/@/.20000008/                            DGH F00 06/21/79 046-055 #31663
<                                                                 #31663
<GO INTO EOT RECOVERY MODE HERE ...                               #31663
UMOV/2780IO+.C0/BE BURP  (BE 2780IO+.C8/ DGH F00 06/21/79 047-055 #31663
< CHECK FOR TIMEOUT IN EOT RECOVERY MODE                          #31663
UMOV/2780IO+.B/B @(CI,5 0/               DGH F00 06/21/79 048-055 #31663
/@/CI,5  .E/                             DGH F00 06/21/79 049-055 #31663
/@/BE . 3/                               DGH F00 06/21/79 050-055 #31663
/@/CI,5 0/                               DGH F00 06/21/79 051-055 #31663
/@/LI,5 .D/                              DGH F00 06/21/79 053-055 #31663
/@/BLAAL;KBURP;KPHOEZE;KRPT$ORG;KB NEW$FLO/  F00 06/21/79 054-055 #31663
#                                        DGH F00 06/21/79 055-055 #31663
10/02/79
< During an M:LDTRC to a previously saved program, the            #32188
< user's procedure may be mysteriously trashed if:                #32188
<                                                                 #32188
<    -  an E:NC event is reported on the user when attempting     #32188
<       to acquire pages for the procedure to be restored;        #32188
<                                                                 #32188
<    -  the user is outswapped in response to the E:NC;           #32188
<                                                                 #32188
<    -  the user has no dynamic pages or Delta context;           #32188
<                                                                 #32188
<    -  the user does not successfully complete some form of      #32188
<       get-page request before being outswapped again.           #32188
<                                                                 #32188
<  If all of the above happen, the user's procedure is not        #32188
<  outswapped after being read from the *N file;  the next        #32188
<  time the user goes through an inswap, garbage from the         #32188
<  user's allocated swap sectors is read into the procedure       #32188
<  area.  The user immediately traps.                             #32188
<                                                                 #32188
LDLNK/LNKTRC+.22E/B @ (STS,10 JIT+.14/   DCP F00 08/21/79 001-007 #32188
/@/STS,10 JIT+.14/                       DCP F00 08/21/79 002-007 #32188
/@/LH,11 UH:FLG,6/                       DCP F00 08/21/79 004-007 #32188
/@/OR,11 LITERALS+8/                     DCP F00 08/21/79 005-007 #32188
/@/STH,11 UH:FLG,6/                      DCP F00 08/21/79 006-007 #32188
/@/B LNKTRC+.22F/                        DCP F00 08/21/79 007-007 #32188
10/02/79
<BATCH ALLOWS ONLY 25 STRING REPLACEMENTS NOW, EVEN THE MANUAL SAY#32284
<50 AND THERE IS TABLE SPACE FOR 50 IN BATCH.                     #32284
<PATCH THE UPWARD LIMIT TO 50 4-WORD PACKETS FOR A STRING REPLACEM#32284
,BATCH2PP+1E,C8(64).                     DGH F00 08/27/79 001-001 #32284
10/02/79
<                                                                 #32439
<INITIALIZE COB:SIOS TABLE TO ALL .C0 ENTRIES.                    #32439
<THEN HAVE COCG NOT MESS WITH THE TABLE COB:SIOS AT ALL FOR FECP  #32439
<DEVICES.  THIS ALLOWS COCG RESTART AFTER POWER FAIL, RIO TO MIOP #32439
< ETC. TO NOT AFFECT THE FRONT END. THIS MAKES L6G THE SOLE       #32439
<MANIPULATOR OF COB:SIOS TABLE ENTRIES FFOR FRONT END DEVICES.    #32439
<                                                                 #32439
< 5 PATCHES TO COCG, 2 PATCHES TO MONITOR ROOT                    #32439
<THE FIRST 5 PATCHES FOR THIS SIDR ARE APPLIED AGAINST COCG.      #32439
,COCG+B2,68000000+PATCH(022000C0).       DGH F00 07/19/79 001-007 #32439
,PATCH+0,21500000+L6#FIRST.              DGH F00 07/19/79 002-007 #32439
,PATCH+1,681000B4+COCG.                  DGH F00 07/19/79 003-007 #32439
,PATCH+2,022000C0.                       DGH F00 07/19/79 004-007 #32439
,PATCH+3,680000B3+COCG.                  DGH F00 07/19/79 005-007 #32439
<PATCHES TO MONITOR ROOT                                          #32439
/COCD+.57/.C0C0C0C0(0)/                  DGH F00 07/19/79 006-007 #32439
/COCD+.58/.C0C0C0C0(0)/                  DGH F00 07/19/79 007-007 #32439
10/02/79
#L6R                                     DGH F00 07/24/79 001-028 #32440
< DIAL UP FECP ARE NOT EVER HUNG UP, EVEN AFTER LINE TIMED OUT    #32440
STEPOVR/STPNR .7D6/LH,1 COCOC,2(STB,6 LB:UN,2/   07/24/79 002-028 #32440
STEPOVR/STPNR .7D7/BNE STPNR .7DB(LH,1 COCOC,2/  07/24/79 003-028 #32440
STEPOVR/STPNR .7D8/LB,1 MODE2,2(BNE STPNR .7DC/  07/24/79 004-028 #32440
STEPOVR/STPNR .7D9/AND,1 LITERALS .4A(LB,1 MODE2,2/       005-028 #32440
STEPOVR/STPNR .7DA/B @(AND,1 LITERALS .4A/   F00 07/24/79 006-028 #32440
STEPOVR/STPNR .7DB/STB,6 LB:UN,2(STB,1 MODE2,2/  07/24/79 007-028 #32440
/@/LC MODE2,2/                           DGH F00 07/24/79 008-028 #32440
/@/STB,1 MODE2,2/                        DGH F00 07/24/79 009-028 #32440
<CHECK FOR HANGUP BIT                                             #32440
/@/BCR,8 STPNR .7DB/                     DGH F00 07/24/79 010-028 #32440
/@/CLM,2 L6LIMS/                         DGH F00 07/24/79 011-028 #32440
<CHECK FOR FECP                                                   #32440
/@/BCS,9 STPNR .7DB/                     DGH F00 07/24/79 012-028 #32440
/@/LB,1 MODE6,2/                         DGH F00 07/24/79 013-028 #32440
< CHECK FOR HARDWIRED                                             #32440
/@/CI,1 1/                               DGH F00 07/24/79 014-028 #32440
/@/BCS,4 STPNR .7DB/                     DGH F00 07/24/79 015-028 #32440
/@/LI,1 LCOC/                            DGH F00 07/24/79 016-028 #32440
/@/CLM,2 COD:LPC,1/                      DGH F00 07/24/79 017-028 #32440
/@/BCR,9 . 2/                            DGH F00 07/24/79 018-028 #32440
/@/BDR,1 .-2/                            DGH F00 07/24/79 019-028 #32440
/@/LD,4 COD:LPC,1/                       DGH F00 07/24/79 020-028 #32440
/@/SW,4 2/                               DGH F00 07/24/79 021-028 #32440
/@/XW,4 7/                               DGH F00 07/24/79 023-028 #32440
<TURN LINE OFF, THEN BACK ON                                      #32440
/@/EXU CO:RCVDO,1/                       DGH F00 07/24/79 024-028 #32440
/@/EXU CO:RCVON,1/                       DGH F00 07/24/79 025-028 #32440
/@/XW,4 7/                               DGH F00 07/24/79 026-028 #32440
/@/B STPNR .7DB/                         DGH F00 07/24/79 027-028 #32440
#                                        DGH F00 07/24/79 028-028 #32440
10/02/79
< Fix EDIT so it won't loop in BATCH when XEQ'ing a               #32462
< non-existent file.                                              #32462
,P+900,69800025+PATCHP(6980090E+P).      LPH F00 08/26/79 001-006 #32462
,PATCHP+25;                              LPH F00 08/26/79 002-006 #32462
 ,6A7016FF+P(0); +25 BAL,LNK TYPEMSG     LPH F00 08/26/79 003-006 #32462
 ,0000012B+P(0); +26 DATA    ERRM14      LPH F00 08/26/79 004-006 #32462
 ,6A7016A4+P(0); +27 BAL,LNK RESET$XEQ$MODE+4    08/26/79 005-006 #32462
 ,E800000D(0).   +28 B       *F:LNK      LPH F00 08/26/79 006-006 #32462
10/02/79
<CATCH BAD JOB CARD                                               #32484
,RBG+956,221000DF(221000C1).             MSC FOO 08/28/79 001-002 #32484
,RBG+958,69F009ED+RBG(69C009ED+RBG).     MSC F00 08/28/79 002-002 #32484
10/02/79
< Fix EDIT so it will retain the column selections as if          #32506
< they were specified in a SE command.                            #32506
,P+CDC,68000029+PATCHP.                  LPH F00 08/26/79 001-008 #32506
,PATCHP+29;                              LPH F00 08/26/79 002-008 #32506
 ,35500259+D(0); +29 STW,P1  SV1STSET    LPH F00 08/26/79 003-008 #32506
 ,32B0017C+D(0); +2A LW,R1   FRSTCLMN    LPH F00 08/26/79 004-008 #32506
 ,32B00187+D(0); +2C LW,R1   LASTCLMN    LPH F00 08/26/79 006-008 #32506
 ,35B00185+D(0); +2D STW,R1  SELASTCLMN  LPH F00 08/26/79 007-008 #32506
 ,68000CDD+P(0). +2E B       TYP5+1      LPH F00 08/26/79 008-008 #32506
<
<
<
<        ADD THE THREE FOLLOWING LINES IN THE L6 FECP SYMBOL DEF AREA
<         TO BE PREPARED FOR THE C00 FECP RELEASE
#L6GC00
#L6GA00=0
#
*********************** SST 9-79 *****************************
****************************
09/04/79
< NOTE! PATCHES FOR SIDR #31662, DATED 7/23/79, ARE BAD AND
< MUST BE REMOVED.
<*************************************************************
09/04/79
< NOTE! PATCHES FOR SIDR #32348, DATED 5/29/79, ARE BAD AND
< MUST BE REMOVED.
***********************
*********************** SST 8-79 *****************************
****************************
08/01/79
<NOTE: A NEW SOURCE UPDATE FOR VOLINIT HAS BEEN WRITTEN IN        #32289
<      RESPONSE TO SIDR #32289.  IT IS AVAILABLE ON THE           #32289
<      AUGUST,1979 SST TAPE IN THE FOLLOWING FILES:               #32289
<             UPDATE:       VOLINIT:SI                            #32289
<             ROM:          VOLINIT:BO                            #32289
<             DIAG:         DIAG                                  #32289
<
<      NOTE ALSO THAT THE ONE CARD PATCH TO GENMD VOLINIT FOR     #32289
<      SIDR #31910 HAS BEEN REMOVED SINCE IT WAS INCORPORATED     #32289
<      INTO THE NEW UPDATE SOURCE.                                #32289
07/27/79
< THE OBJECT OF THESE PATCHES ARE TO IMPROVE MULTI-PROCESSOR      #31662
< PERFORMANCE BY SCHEDULING USERS AS MUCH AS POSSIBLE ON          #31662
< RESPONSE TIME. CONCURRENTLY WITH THIS, USERS WHO ISSUE          #31662
< EITHER AN M:SYS,M:MASTER, OR M:CAL WITH A MASTER MODE PSD       #31662
< WILL BE BLOCKED ON THE MASTER CPU BY SETTING THE MASTER         #31662
< PERMANENT BIT IN UB:MPFLG. THIS BIT WILL ONLY BE                #31662
< RESET AT JOB STEP TIME IN ORDER TO PROTECT AS MUCH AS           #31662
< POSSIBLE USERS WHO RUN IN MASTER MODE. THIS MEANS THAT          #31662
< A USER WANTING TO RUN ON A SLAVE CPU IN MASTER MODE             #31662
< MUST DO SO EXPRESSLY BY RESETTING THAT BIT HIMSELF.             #31662
< THIS BIT WILL BE RESET AT STEP TIME, DURING                     #31662
< USER RUNDOWN, BUT ONLY AFTER PMD'S AND OTHER                    #31662
< DEBUGGING HAS BEEN DONE                                         #31662
< IN ADDITION TO THIS PERFORMANCE IMPROVEMENT PATCH,              #31662
< THE ETMF FOR MP SYSTEMS WILL NOW BE CALCULATED TO REFLECT       #31662
< MORE ACCURATELY THE LOAD, USING THE SAME ALGORITHM AS           #31662
< CP-6 PRESENTLY USES, THAT IS TO SAY:                            #31662
< NEW ETMF=(OLD ETMF + #MEXEC + (#SEXEC/#CPUS))/2                 #31662
< WHERE    #MEXEC IS THE NUMBER OF USERS THAT CAN ONLY            #31662
<                 EXECUTE ON THE MASTER                           #31662
<          #SEXEC IS THE NUMBER OF USERS THAT CAN EXECUTE         #31662
<                 ON ANY OF THE CPUS                              #31662
<          #CPUS  IS THE NUMBER OF CURRENTLY ACTIVE CPUS          #31662
< THE ALGORITHM FOR SINGLE CPUS OR MP SYSTEMS WITH ONLY           #31662
< ONE ACTIVE CPU WILL REMAIN AS BEFORE.                           #31662
<                                                                 #31662
<                            9 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           41 LINES TO UMOV                      #31662
< CORRECT ETMF ALGORITHM FOR MP SYSTEMS                           #31662
#NSCPU                                   MSC F00 07/23/79 001-095 #31662
#C:ETM=LITERALS+.CB                      MSC F00 07/23/79 002-095 #31662
/PM .72/B @(LW,6 C:ETM/                  MSC F00 07/23/79 003-095 #31662
/@/LI,2 NSCPU/                           MSC F00 07/23/79 004-095 #31662
/@/LI,6 1/                               MSC F00 07/23/79 005-095 #31662
/@/MTB,0 SB:STATE,2/                     MSC F00 07/23/79 006-095 #31662
/@/BEZ . 2/                              MSC F00 07/23/79 007-095 #31662
/@/AI,6 1/                               MSC F00 07/23/79 008-095 #31662
/@/BDR,2 .-3/                            MSC F00 07/23/79 009-095 #31662
/@/LW,3 C:ETM/                           MSC F00 07/23/79 010-095 #31662
/@/MW,3 6/                               MSC F00 07/23/79 011-095 #31662
/@/B PM .73/                             MSC F00 07/23/79 012-095 #31662
/PM .76/B @(AI,6 1/                      MSC F00 07/23/79 013-095 #31662
/@/LC UB:MPFLG,2/                        MSC F00 07/23/79 014-095 #31662
/@/BCS,12 . 3/                           MSC F00 07/23/79 015-095 #31662
/@/AI,3 1/                               MSC F00 07/23/79 016-095 #31662
/@/B PM .77/                             MSC F00 07/23/79 017-095 #31662
/@/AW,3 6/                               MSC F00 07/23/79 018-095 #31662
/@/B PM .77/                             MSC F00 07/23/79 019-095 #31662
/PM .7C/B @(SLS,6 -1/                    MSC F00 07/23/79 020-095 #31662
/@/SLS,6 1/                              MSC F00 07/23/79 021-095 #31662
/@/B PM .7D/                             MSC F00 07/23/79 023-095 #31662
/PM .7D/LW,6 3(AI,6 0/                   MSC F00 07/23/79 024-095 #31662
#C:ETM;K1                                MSC F00 07/23/79 025-095 #31662
< SET MASTER PERM BIT FOR M:MASTER,M:SYS                          #31662
/ALTCP .C5/B @ .1(B ALTCP .160/          MSC F00 07/23/79 026-095 #31662
/ALTCP .306/B @(B ALTCP .160/            MSC F00 07/23/79 027-095 #31662
/@/LI,1 1/                               MSC F00 07/23/79 028-095 #31662
/@/LW,4 S:CUN/                           MSC F00 07/23/79 029-095 #31662
/@/WD,0 .37/                             MSC F00 07/23/79 030-095 #31662
/@/LB,2 UB:MPFLG,4/                      MSC F00 07/23/79 031-095 #31662
/@/SLS,1 6/                              MSC F00 07/23/79 032-095 #31662
/@/OR,2 1/                               MSC F00 07/23/79 033-095 #31662
/@/STB,2 UB:MPFLG,4/                     MSC F00 07/23/79 034-095 #31662
/@/WD,0 .27/                             MSC F00 07/23/79 035-095 #31662
/@/B ALTCP .160/                         MSC F00 07/23/79 036-095 #31662
< THE OBJECT OF THESE PATCHES ARE TO IMPROVE MULTI-PROCESSOR      #31662
< PERFORMANCE BY SCHEDULING USERS AS MUCH AS POSSIBLE ON          #31662
< THE SLAVE CPUS, THEREBY FREEING THE MASTER TO GIVE BETTER       #31662
< RESPONSE TIME. CONCURRENTLY WITH THIS, USERS WHO ISSUE          #31662
< EITHER AN M:SYS,M:MASTER, OR M:CAL WITH A MASTER MODE PSD       #31662
< WILL BE BLOCKED ON THE MASTER CPU BY SETTING THE MASTER         #31662
< PERMANENT BIT IN UB:MPFLG. THIS BIT WILL ONLY BE                #31662
< RESET AT JOB STEP TIME IN ORDER TO PROTECT AS MUCH AS           #31662
< POSSIBLE USERS WHO RUN IN MASTER MODE. THIS MEANS THAT          #31662
< MUST DO SO EXPRESSLY BY RESETTING THAT BIT HIMSELF.             #31662
< THIS BIT WILL BE RESET AT STEP TIME, DURING                     #31662
< USER RUNDOWN, BUT ONLY AFTER PMD'S AND OTHER                    #31662
< DEBUGGING HAS BEEN DONE                                         #31662
< IN ADDITION TO THIS PERFORMANCE IMPROVEMENT PATCH,              #31662
< THE ETMF FOR MP SYSTEMS WILL NOW BE CALCULATED TO REFLECT       #31662
< MORE ACCURATELY THE LOAD, USING THE SAME ALGORITHM AS           #31662
< CP-6 PRESENTLY USES, THAT IS TO SAY:                            #31662
< NEW ETMF=(OLD ETMF + #MEXEC + (#SEXEC/#CPUS))/2                 #31662
< WHERE    #MEXEC IS THE NUMBER OF USERS THAT CAN ONLY            #31662
<                 EXECUTE ON THE MASTER                           #31662
<          #SEXEC IS THE NUMBER OF USERS THAT CAN EXECUTE         #31662
<                 ON ANY OF THE CPUS                              #31662
<          #CPUS  IS THE NUMBER OF CURRENTLY ACTIVE CPUS          #31662
< THE ALGORITHM FOR SINGLE CPUS OR MP SYSTEMS WITH ONLY           #31662
< ONE ACTIVE CPU WILL REMAIN AS BEFORE.                           #31662
<                                                                 #31662
< THESE PATCHES COMPRISE OF 36 LINES TO ROOT                      #31662
<                            9 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           41 LINES TO UMOV                      #31662
< IMPROVE MP PERFOMANCE CONTINUED                                 #31662
< SET MASTER PERM BIT ON M:CAL (MASTER OR MASTER PROT.)           #31662
#NSCPU                                   MSC F00 07/23/79 037-095 #31662
LDLNK/LNKTRC+.68D/B  @(B LNKTRC .4A9/    MSC F00 07/23/79 038-095 #31662
/@/WD,0 .37/                             MSC F00 07/23/79 040-095 #31662
/@/LB,4 UB:MPFLG,1/                      MSC F00 07/23/79 041-095 #31662
/@/OR,4 LITERALS .A/                     MSC F00 07/23/79 042-095 #31662
/@/STB,4 UB:MPFLG,1/                     MSC F00 07/23/79 043-095 #31662
/@/WD,0 .27/                             MSC F00 07/23/79 044-095 #31662
/@/B LNKTRC .4A9/                        MSC F00 07/23/79 045-095 #31662
< THE OBJECT OF THESE PATCHES ARE TO IMPROVE MULTI-PROCESSOR      #31662
< PERFORMANCE BY SCHEDULING USERS AS MUCH AS POSSIBLE ON          #31662
< THE SLAVE CPUS, THEREBY FREEING THE MASTER TO GIVE BETTER       #31662
< RESPONSE TIME. CONCURRENTLY WITH THIS, USERS WHO ISSUE          #31662
< EITHER AN M:SYS,M:MASTER, OR M:CAL WITH A MASTER MODE PSD       #31662
< WILL BE BLOCKED ON THE MASTER CPU BY SETTING THE MASTER         #31662
< PERMANENT BIT IN UB:MPFLG. THIS BIT WILL ONLY BE                #31662
< RESET AT JOB STEP TIME IN ORDER TO PROTECT AS MUCH AS           #31662
< POSSIBLE USERS WHO RUN IN MASTER MODE. THIS MEANS THAT          #31662
< A USER WANTING TO RUN ON A SLAVE CPU IN MASTER MODE             #31662
< MUST DO SO EXPRESSLY BY RESETTING THAT BIT HIMSELF.             #31662
< THIS BIT WILL BE RESET AT STEP TIME, DURING                     #31662
< USER RUNDOWN, BUT ONLY AFTER PMD'S AND OTHER                    #31662
< DEBUGGING HAS BEEN DONE                                         #31662
< IN ADDITION TO THIS PERFORMANCE IMPROVEMENT PATCH,              #31662
< THE ETMF FOR MP SYSTEMS WILL NOW BE CALCULATED TO REFLECT       #31662
< MORE ACCURATELY THE LOAD, USING THE SAME ALGORITHM AS           #31662
< CP-6 PRESENTLY USES, THAT IS TO SAY:                            #31662
< WHERE    #MEXEC IS THE NUMBER OF USERS THAT CAN ONLY            #31662
<                 EXECUTE ON THE MASTER                           #31662
<          #SEXEC IS THE NUMBER OF USERS THAT CAN EXECUTE         #31662
<                 ON ANY OF THE CPUS                              #31662
<          #CPUS  IS THE NUMBER OF CURRENTLY ACTIVE CPUS          #31662
< THE ALGORITHM FOR SINGLE CPUS OR MP SYSTEMS WITH ONLY           #31662
< ONE ACTIVE CPU WILL REMAIN AS BEFORE.                           #31662
<                                                                 #31662
< THESE PATCHES COMPRISE OF 36 LINES TO ROOT                      #31662
<                            9 LINES TO LDLNK                     #31662
<                            9 LINES TO STEPOVR                   #31662
<                           41 LINES TO UMOV                      #31662
< IMPROVE MP PERFORMANCE CONTINUED                                #31662
< RESET MASTER PERM BIT IN MPFLG AT USER RUNDOWN                  #31662
#NSCPU                                   MSC F00 07/23/79 046-095 #31662
STEPOVR/STPNR .17C/B @(LW,7 LITERALS .1A/MSC F00 07/23/79 047-095 #31662
/@/LB,7 UB:MPFLG,4/                      MSC F00 07/23/79 048-095 #31662
/@/AND,7 . 4/                            MSC F00 07/23/79 049-095 #31662
/@/STB,7 UB:MPFLG,4/                     MSC F00 07/23/79 050-095 #31662
/@/LW,7 LITERALS .1A/                    MSC F00 07/23/79 051-095 #31662
/@/B STPNR .17D/                         MSC F00 07/23/79 052-095 #31662
/@/.BF/                                  MSC F00 07/23/79 053-095 #31662
< THE OBJECT OF THESE PATCHES ARE TO IMPROVE MULTI-PROCESSOR      #31662
< PERFORMANCE BY SCHEDULING USERS AS MUCH AS POSSIBLE ON          #31662
< THE SLAVE CPUS, THEREBY FREEING THE MASTER TO GIVE BETTER       #31662
< EITHER AN M:SYS,M:MASTER, OR M:CAL WITH A MASTER MODE PSD       #31662
< WILL BE BLOCKED ON THE MASTER CPU BY SETTING THE MASTER         #31662
< PERMANENT BIT IN UB:MPFLG. THIS BIT WILL ONLY BE                #31662
< RESET AT JOB STEP TIME IN ORDER TO PROTECT AS MUCH AS           #31662
< POSSIBLE USERS WHO RUN IN MASTER MODE. THIS MEANS THAT          #31662
< A USER WANTING TO RUN ON A SLAVE CPU IN MASTER MODE             #31662
< MUST DO SO EXPRESSLY BY RESETTING THAT BIT HIMSELF.             #31662
< THIS BIT WILL BE RESET AT STEP TIME, DURING                     #31662
< USER RUNDOWN, BUT ONLY AFTER PMD'S AND OTHER                    #31662
< DEBUGGING HAS BEEN DONE                                         #31662
< IN ADDITION TO THIS PERFORMANCE IMPROVEMENT PATCH,              #31662
< THE ETMF FOR MP SYSTEMS WILL NOW BE CALCULATED TO REFLECT       #31662
< MORE ACCURATELY THE LOAD, USING THE SAME ALGORITHM AS           #31662
< CP-6 PRESENTLY USES, THAT IS TO SAY:                            #31662
< NEW ETMF=(OLD ETMF + #MEXEC + (#SEXEC/#CPUS))/2                 #31662
< WHERE    #MEXEC IS THE NUMBER OF USERS THAT CAN ONLY            #31662
<                 EXECUTE ON THE MASTER                           #31662
<          #SEXEC IS THE NUMBER OF USERS THAT CAN EXECUTE         #31662
<                 ON ANY OF THE CPUS                              #31662
<          #CPUS  IS THE NUMBER OF CURRENTLY ACTIVE CPUS          #31662
< THE ALGORITHM FOR SINGLE CPUS OR MP SYSTEMS WITH ONLY           #31662
< ONE ACTIVE CPU WILL REMAIN AS BEFORE.                           #31662
<                                                                 #31662
< THESE PATCHES COMPRISE OF 36 LINES TO ROOT                      #31662
<                            9 LINES TO STEPOVR                   #31662
<                           41 LINES TO UMOV                      #31662
< IMPROVE MP PERFORMANCE CONTINUED                                #31662
< THIS PART OF THE PATCH MUST BE PLACED IN                        #31662
< THE UMOV OVERLAY BECAUSE IT REFERS TO SWPSCED,                  #31662
< A LABEL IN THE UMOV OVERLAY.                                    #31662
#NSCPU                                   MSC F00 07/23/79 054-095 #31662
#WHIP=@                                  MSC F00 07/23/79 055-095 #31662
/@/STH,2 TSTACK+1/                       MSC F00 07/23/79 056-095 #31662
/@/MTW,0 TCATCH .74/                     MSC F00 07/23/79 057-095 #31662
/@/BNEZ SCHED .3A3/                      MSC F00 07/23/79 058-095 #31662
/@/LW,2 LITERALS .1B/                    MSC F00 07/23/79 059-095 #31662
/@/CW,2 TSTACK 2/                        MSC F00 07/23/79 060-095 #31662
/@/BAZ SCHED .3A3/                       MSC F00 07/23/79 061-095 #31662
/@/CW,4 S:CUN/                           MSC F00 07/23/79 062-095 #31662
/@/BNE SCHED .3A3/                       MSC F00 07/23/79 063-095 #31662
/@/LC UB:MPFLG,4/                        MSC F00 07/23/79 064-095 #31662
/@/BCS,12 SCHED .3A3/                    MSC F00 07/23/79 065-095 #31662
/@/LB,2 UB:MPFLG,4/                      MSC F00 07/23/79 066-095 #31662
/@/AND,2 LITERALS .4A/                   MSC F00 07/23/79 067-095 #31662
/@/STB,2 UB:MPFLG,4/                     MSC F00 07/23/79 068-095 #31662
/@/MTW,0 SB:MPSW/                        MSC F00 07/23/79 069-095 #31662
/@/BEZ SCHED .3A3/                       MSC F00 07/23/79 070-095 #31662
/@/LC SSDAT .12/                         MSC F00 07/23/79 071-095 #31662
/@/BCS,8 SCHED .3A3/                     MSC F00 07/23/79 072-095 #31662
/@/LI,2 19/                              MSC F00 07/23/79 073-095 #31662
/@/MSP,2 TSTACK/                         MSC F00 07/23/79 074-095 #31662
/@/LW,2 JIT/                             MSC F00 07/23/79 075-095 #31662
/@/BEZ . 15/                             MSC F00 07/23/75 076-095 #31662
/@/LI,1 NSCPU-1/                         MSC F00 07/23/79 077-095 #31662
/@/MTW,0 S:PCUN+1,1/                     MSC F00 07/23/79 078-095 #31662
/@/BE . 3/                               MSC F00 07/23/79 079-095 #31662
/@/BDR,1  .-2/                           MSC F00 07/23/79 080-095 #31662
/@/B SCHED .43/                          MSC F00 07/23/79 081-095 #31662
/@/AI,1 1/                               MSC F00 07/23/79 082-095 #31662
/@/MTB,0 SB:MPSW,1/                      MSC F00 07/23/79 083-095 #31662
/@/BEZ SCHED .43/                        MSC F00 07/23/79 084-095 #31662
/@/STW,4 S:PCUN,1/                       MSC F00 07/23/79 085-095 #31662
/@/LI,0 0/                               MSC F00 07/23/79 086-095 #31662
/@/STB,0 SB:MPSW,1/                      MSC F00 07/23/79 087-095 #31662
/@/BAL,1 UNMAP/                          MSC F00 07/23/79 088-095 #31662
/@/BAL,11 SWPSCED/                       MSC F00 07/23/79 089-095 #31662
/@/B SCHED .C5/                          MSC F00 07/23/79 090-095 #31662
/@/BAL,0 SCHED .2B/                      MSC F00 07/23/79 091-095 #31662
/@/B SCHED .39B/                         MSC F00 07/23/79 092-095 #31662
/SCHED .3A2/B WHIP(STH,2 TSTACK 1/       MSC F00 07/23/79 093-095 #31662
/SCHED .3A0/BE WHIP 1(BE SCHED .3A3/     MSC F00 07/23/79 094-095 #31662
#WHIP;K1                                 MSC F00 07/23/79 095-095 #31662
07/27/79
<FIX IOSPIN SO USER CAN'T HANG SYSTEM                             #32418
/IORT .33B/B @(B IORT .336/              MSC F00 07/05/79 001-005 #32418
/@/MTB,0 UB:MF,1/                        MSC F00 07/05/79 003-005 #32418
/@/BE *11/                               MSC F00 07/05/79 004-005 #32418
/@/B IORT .336/                          MSC F00 07/05/79 005-005 #32418
07/27/79
#                                        DGH F00 07/06/79 001-059 #32289
<THESE PATCHES ARE SOME OF THE SOLUTIONS TO THE RMP PROBLEM WITHV##32289
< VOLINIT. IF YOU DO NOT HAVE A 560 THEN THESE PATCHES MAY BE     #32289
< REMOVED BY SETTING THE SYMBOL 'X560' TO ZERO.                   #32289
#X560=1                                  DGH F00 07/06/79 002-059 #32289
#X560                                    DGH F00 07/06/79 003-059 #32289
RMAOV/FISH+.5BB/LD,12 DCT13,3(LCI 0/     DGH F00 07/06/79 004-059 #32289
RMAOV/FISH+.5BC/LC DCT20,3(TDV,12 *15/   DGH F00 07/06/79 005-059 #32289
RMAOV/FISH .5BF/TIO,12 *15(HIO,12 *15/   DGH F00 07/06/79 006-059 #32289
< M;DOPEN SETS HIGH ORDER BIT FOR IN CIT4 FOR RMP DEVICE          #32289
RMAOV/FISH .3AB/B @(STW,9 DCT9,2/        DGH F00 07/06/79 007-059 #32289
/@/STW,9 DCT9,2/                         DGH F00 07/06/79 008-059 #32289
/@/LH,1 DCT23,2/                         DGH F00 07/06/79 009-059 #32289
/@/BE FISH .3AC/                         DGH F00 07/06/79 010-059 #32289
/@/LB,1 DCT22,2/                         DGH F00 07/06/79 011-059 #32289
/@/LW,8 NSPT,1/                          DGH F00 07/06/79 012-059 #32289
/@/CI,8 .C/                              DGH F00 07/06/79 013-059 #32289
/@/BNE FISH .3AC/                        DGH F00 07/06/79 014-059 #32289
/@/LW,8 NTPC,1/                          DGH F00 07/06/79 015-059 #32289
/@/CI,8 .13/                             DGH F00 07/06/79 016-059 #32289
/@/BNE FISH .3AC/                        DGH F00 07/06/79 017-059 #32289
/@/LW,9 LITERALS .23/                    DGH F00 07/06/79 019-059 #32289
/@/STS,9 CIT4,1/                         DGH F00 07/06/79 020-059 #32289
/@/B FISH .3AC/                          DGH F00 07/06/79 021-059 #32289
<M:DCLOSE RESETS BIT IN CIT4 WHEN ALL DEVICES ARE NOT IN DIAG MODE#32289
RMAOV/FISH .46C/B @(STW,8 DCT9,2/        DGH F00 07/06/79 022-059 #32289
/@/STW,8 DCT9,2/                         DGH F00 07/06/79 023-059 #32289
/@/LH,5 DCT23,2/                         DGH F00 07/06/79 024-059 #32289
/@/BE FISH .46D/                         DGH F00 07/06/79 025-059 #32289
/@/LB,5 DCT22,2/                         DGH F00 07/06/79 026-059 #32289
/@/LW,8 NSPT,5/                          DGH F00 07/06/79 027-059 #32289
/@/CI,8 .C/                              DGH F00 07/06/79 028-059 #32289
/@/BNE FISH .46D/                        DGH F00 07/06/79 029-059 #32289
/@/LW,8 NTPC,5/                          DGH F00 07/06/79 030-059 #32289
/@/CI,8 .13/                             DGH F00 07/06/79 031-059 #32289
/@/BNE FISH .46D/                        DGH F00 07/06/79 032-059 #32289
/@/LI,5 DCTSIZ/                          DGH F00 07/06/79 033-059 #32289
/@/LB,8 DCT2,2/                          DGH F00 07/06/79 034-059 #32289
/@/CB,8 DCT2,5/                          DGH F00 07/06/79 035-059 #32289
/@/BNE . 3/                              DGH F00 07/06/79 036-059 #32289
/@/INT,9 DCT9,5/                         DGH F00 07/06/79 037-059 #32289
/@/BCS,2 FISH .46D/                      DGH F00 07/06/79 038-059 #32289
/@/BDR,5 .-5/                            DGH F00 07/06/79 039-059 #32289
/@/LB,5 DCT2,2/                          DGH F00 07/06/79 040-059 #32289
/@/LW,8 CIT4,5/                          DGH F00 07/06/79 041-059 #32289
/@/AND,8 LITERALS .62/                   DGH F00 07/06/79 042-059 #32289
/@/STW,8 CIT4,5/                         DGH F00 07/06/79 043-059 #32289
/@/B FISH .46D/                          DGH F00 07/06/79 044-059 #32289
#                                        DGH F00 07/06/79 045-059 #32289
#X560                                    DGH F00 07/06/79 046-059 #32289
<CONTINUATION OF PATCHES FOR VOLINIT PROBLEM                      #32289
< UMOV OVERLAY ...                                                #32289
UMOV/HANDLERS+.1EA/B @(BAL,10 HANDLERS+.BD/  F00 07/06/79 047-059 #32289
/@/LH,6 DCT1,1/                          DGH F00 07/06/79 048-059 #32289
/@/TIO,8 0,6/                            DGH F00 07/06/79 049-059 #32289
/@/BCS,12 IOQ .E8/                       DGH F00 07/06/79 050-059 #32289
/@/LI,10 HANDLERS+.1EB/                  DGH F00 07/06/79 051-059 #32289
/@/B HANDLERS+.BD/                       DGH F00 07/06/79 052-059 #32289
< DONT DO PRE-SEEKS WHEN A RMP DEVICE ON CONTROLLER IS IN DIAG MOD#32289
UMOV/HANDLERS .27F/B @(B HANDLERS .C5/   DGH F00 07/06/79 053-059 #32289
/@/LB,5 DCT2,1/                          DGH F00 07/06/79 054-059 #32289
/@/MTW,0 CIT4,5/                         DGH F00 07/06/79 055-059 #32289
/@/BGE HANDLERS .C5/                     DGH F00 07/06/79 056-059 #32289
/@/AND,4 LITERALS .62/                   DGH F00 07/06/79 057-059 #32289
/@/B HANDLERS .C5/                       DGH F00 07/06/79 058-059 #32289
#                                        DGH F00 07/06/79 059-059 #32289
07/27/79
< *************************************************************** #31625
< REPLACEMENT PATCH FOR 31625 WHICH WAS ERRONEOUSLY RELEASED AS   #31625
< 31825, DATED 10/24/78                                           #31625
< *************************************************************** #31625
<                                                                 #31625
#MOSTAB                                  JLJ F00 11/21/78 001-007 #31625
UMOV/CSECOM+.89/B @(CI,4 0/              JLJ F00 11/21/78 002-007 #31625
/@/CW,9 LITERALS+.20/                    JLJ F00 11/21/78 003-007 #31625
/@/BANZ CSECOM+.93/                      JLJ F00 11/21/78 004-007 #31625
/@/CI,4 0/                               JLJ F00 11/21/78 005-007 #31625
/@/B CSECOM+.8A/                         JLJ F00 11/21/78 006-007 #31625
#                                        JLJ F00 11/21/78 007-007 #31625
07/27/79
< Fix EDIT so it will COPY passworded files over themselves,      #32416
< either implicitly(COPY A..B) or explicitly(COPY A..B OVER A..B) #32416
< Note however it is still not possible to change or remove a     #32416
< password from a file.                                           #32416
,P+876,32200005(693008CD+P).             LPH F00 07/06/79 001-013 #32416
,P+88D,6800001B+PATCHP(693008CD+P).      LPH F00 07/06/79 002-013 #32416
,PATCHP+1B;.                             LPH F00 07/06/79 003-013 #32416
 ,F2300002(0);        LB,3  *2           LPH F00 07/06/79 004-013 #32416
 ,F1300005(0);        CB,3  *5           LPH F00 07/06/79 005-013 #32416
 ,693008CD+P(0);      BNE   P+8CD        LPH F00 07/06/79 006-013 #32416
 ,21300000(0);        CI,3  0            LPH F00 07/06/79 007-013 #32416
 ,6830088E+P(0);      BE    P+88E        LPH F00 07/06/79 008-013 #32416
 ,F2760002(0);        LB,7  *2,3         LPH F00 07/06/79 009-013 #32416
 ,F1760005(0);        CB,7  *5,3         LPH F00 07/06/79 010-013 #32416
 ,693008CD+P(0);      BNE   P+8CD        LPH F00 07/06/79 011-013 #32416
 ,64300020+PATCHP(0); BDR,3 PATCHP+20    LPH F00 07/06/79 012-013 #32416
 ,6800088E+P(0).      B     P+88E        LPH F00 07/06/79 013-013 #32416
07/27/79
< IS STILL THE SAME AS IT ALWAYS WAS).   JLJ                      #31986
:GENMD,ERR:FIL ERR:FIL+B9,222000FF(75100026+DATA).1/09/79 001-008 #31986
:GENMD,ERR:FIL ERR:FIL+BA,38200001(222000FF).F00 01/09/79 002-008 #31986
:GENMD,ERR:FIL ERR:FIL+BB,352000EB+DATA(38200001).        003-008 #31986
:GENMD,ERR:FIL ERR:FIL+BC,691000C0+ERR:FIL(352000EB+DATA).004-008 #31986
:GENMD,ERR:FIL ERR:FIL+BD,75100026+DATA(691000C0+ERR:FIL).005-008 #31986
:GENMD,ERR:FIL ERR:FIL+16F,33F000EB+DATA(73100026+DATA).  006-008 #31986
:GENMD,ERR:FIL ERR:FIL+170,E9100008(33F000EB+DATA).       007-008 #31986
:GENMD,ERR:FIL ERR:FIL+171,73100026+DATA(E9100008).       008-008 #31986
07/27/79
< Fix LOADER so when ONLINE and mapping a Load Module with        #32277
< pagination in effect, a check is made to see if VFC             #32277
< is a '*'.  If so change it to a ' '(blank).  COC takes          #32277
< the '*' to be a Top Of Form which caused the first 4 lines      #32277
< of the Load Map to begin on a new page!                         #32277
FIN,FINISH+599,6800004E+PATCH(0410059B+FINISH).  07/06/79 001-010 #32277
LDR,PATCH+4E;.                           LPH F00 07/06/79 002-010 #32277
 ,227000FF;   PATCH+4E LI,7   X'FF'      LPH F00 07/06/79 003-010 #32277
 ,4B700003+BUF;    +4F AND,7  LLBUF+3    LPH F00 07/06/79 004-010 #32277
 ,2170005C;        +50 CI,7   '*'        LPH F00 07/06/79 005-010 #32277
 ,69300054+PATCH;  +51 BNE    PATCH+.54  LPH F00 07/06/79 006-010 #32277
 ,22700040;        +52 LI,7   ' '        LPH F00 07/06/79 007-010 #32277
 ,35700003+BUF;    +53 STW,7  LLBUF+3    LPH F00 07/06/79 008-010 #32277
 ,0410059B+FINISH; +54 CAL1,1 WRTLLO     LPH F00 07/06/79 009-010 #32277
 ,68000588+FINISH. +55 B      CLRBUF     LPH F00 07/06/79 010-010 #32277
07/27/79
EVL,MCEV+2A6,68000044+PATCH(88700000).   DGH F00 06/13/79 001-011 #31918
LDR,PATCH+44,3FFFFFFF.                   DGH F00 06/13/79 002-011 #31918
LDR,PATCH+45,32A60000.                   DGH F00 06/13/79 003-011 #31918
LDR,PATCH+46,32B00044+PATCH.             DGH F00 06/13/79 004-011 #31918
LDR,PATCH+47,32160001.                   DGH F00 06/13/79 005-011 #31918
LDR,PATCH+48,88700000.                   DGH F00 06/13/79 006-011 #31918
LDR,PATCH+49,45A60003.                   DGH F00 06/13/79 007-011 #31918
LDR,PATCH+4A,693002A7+MCEV.              DGH F00 06/13/79 008-011 #31918
LDR,PATCH+4B,31160004.                   DGH F00 06/13/79 009-011 #31918
LDR,PATCH+4C,693002A7+MCEV.              DGH F00 06/13/79 010-011 #31918
LDR,PATCH+4D,6800026F+MCEV.              DGH F00 06/13/79 011-011 #31918
*********************** SST 7-79 *****************************
*****************************
06/12/79
<COC WRITE ROUTINE WILL NOT FREE UP MPOOL USED FOR BUFFER IF ESC-W#32347
<MODE IS SET, OR IF ITS A TRANSPARENT WRITE TO TERMINAL           #32347
#TPCOC                                   DGH F00 06/04/79 001-013 #32347
#R@2969=COCR+.5A4                        DGH F00 06/04/79 002-013 #32347
#R@3255=COCR+.672                        DGH F00 06/04/79 003-013 #32347
#REGCOC                                  DGH F00 06/04/79 004-013 #32347
#R@2969=COCR+.570                        DGH F00 06/04/79 005-013 #32347
#R@3255=COCR+.623                        DGH F00 06/04/79 006-013 #32347
#R@2969                                  DGH F00 06/04/79 007-013 #32347
/R@2969/BCS,1 R@3255(BCS,1 STEP+.1D/     DGH F00 06/04/79 008-013 #32347
/R@2969+8/B R@3255(B STEP+.1D/           DGH F00 06/04/79 009-013 #32347
#R@2969;KR@3255;K1                       DGH F00 06/04/79 010-013 #32347
/COCR+.4BA/B COCR+.550(B STEP+.1D/       DGH F00 06/04/79 012-013 #32347
#                                        DGH F00 06/04/79 013-013 #32347
******************************
06/12/79
< PREVENT DUPLICATE PRINT BLOCKS ON PRINTER OUTPUT WHEN THE       #32238
< PRINTER SUSPBIT IS SET AND ANOTHER RECORD IS SENT TO ANY OTHER  #32238
< OUTPUT DEVICE.                                                  #32238
#HASPIO                                  DGH F00 06/05/79 001-039 #32238
UMOV/HASPIO+.1FC/OR,10 @(AI,10 .2000)/   DGH F00 06/05/79 002-039 #32238
/@/.2080/                                DGH F00 06/05/79 003-039 #32238
UMOV/HASPIO+.32F/B $+3(LW,12 .16,6)/     DGH F00 06/05/79 004-039 #32238
UMOV/HASPIO+.31F/CI,10 .80(CI,10 .B00)/  DGH F00 06/05/79 005-039 #32238
UMOV/. 1/BAZ *8(BANZ *8)/                DGH F00 06/05/79 006-039 #32238
UMOV/. 1/AI,10 -.80(LC SSIG,4)/          DGH F00 06/05/79 007-039 #32238
UMOV/. 1/NOP 1(BCR,4 *8)/                DGH F00 06/05/79 008-039 #32238
UMOV/HASPIO+.324/B $+2/                  DGH F00 06/05/79 009-039 #32238
UMOV/HASPIO+.230/B $+6(LW,1 .1C,6)/      DGH F00 06/05/79 010-039 #32238
UMOV/HASPIO+.280/B $+2(LW,14 ;Q)/        DGH F00 06/05/79 011-039 #32238
UMOV/HASPIO+.282/LI,4 0(STW,14 .16,6)/   DGH F00 06/05/79 012-039 #32238
UMOV/HASPIO+.28C/CI,10 .80(CI,10 .2000)/ DGH F00 06/05/79 013-039 #32238
UMOV/. 1/B @(BAZ HASPIO+.11B)/           DGH F00 06/05/79 014-039 #32238
/@/BAZ HASPIO+.11B/                      DGH F00 06/05/79 015-039 #32238
/@/AI,10 -.80/                           DGH F00 06/05/79 016-039 #32238
/@/CI,10 .2000/                          DGH F00 06/05/79 017-039 #32238
/@/BANZ HASPIO+.28E/                     DGH F00 06/05/79 018-039 #32238
/@/EOR,10 BITS+13/                       DGH F00 06/05/79 019-039 #32238
/@/STH,10 STH:FLG,4/                     DGH F00 06/05/79 020-039 #32238
/@/B HASPIO+.11B/                        DGH F00 06/05/79 021-039 #32238
UMOV/BSCIO .115/B @(OR,15 .16,6/         DGH F00 06/05/79 022-039 #32238
/@/LH,10 STH:FLG,4/                      DGH F00 06/05/79 023-039 #32238
/@/CI,10 .1000/                          DGH F00 06/05/79 024-039 #32238
/@/BAZ .+2/                              DGH F00 06/05/79 025-039 #32238
/@/OR,15 BITS+25/                        DGH F00 06/05/79 026-039 #32238
/@/B BSCIO .116/                         DGH F00 06/05/79 027-039 #32238
<                                                                 #32238
UMOV/HASPIO .C1/.FFFFDEFF(.FFFFCEFF/     DGH F00 06/05/79 028-039 #32238
UMOV/HASPIO .1CE/B @(STW,12 .18,6/       DGH F00 06/05/79 029-039 #32238
/@/STW,12 .18,6/                         DGH F00 06/05/79 030-039 #32238
/@/WD,0 .37/                             DGH F00 06/05/79 031-039 #32238
/@/LH,8 STH:FLG,4/                       DGH F00 06/05/79 032-039 #32238
/@/OR,8 BITS+8/                          DGH F00 06/05/79 033-039 #32238
/@/STH,8 STH:FLG,4/                      DGH F00 06/05/79 034-039 #32238
/@/WD,0 .27/                             DGH F00 06/05/79 035-039 #32238
/@/B HASPIO .1CF/                        DGH F00 06/05/79 036-039 #32238
UMOV/HASPIO .285/MTW,0 .23,6(LW,4 .1D,6/ DGH F00 06/05/79 037-039 #32238
UMOV/HASPIO .286/BNE HASPIO .2A3(BE HASPIO .2A3/ 06/05/79 038-039 #32238
#                                        DGH F00 06/05/79 039-039 #32238
*********************** SST 6-79 *****************************
****************************
05/29/79
<
< DEFINE A SYMBOL CALLED L6GA00 IF THE MODULE L6R IS PRESENT
<   IN THE MONITOR ROOT AND THE SYMBOL L6GB00 IS EITHER ABSENT OR ZERO.
<
#L6R
#L6GA00=1
#
#L6GB00
#L6GA00=0
#
<L6GA00 AND L6GB00 REFLECT WHICH VERSION OF L6R WAS INCLUDED IN
<THE MONITOR LOAD.  L6R VERSION B00 DEFINES THE SYMBOL L6GB00 AS 1.
<L6R VERSION A00 DEFINES NO SIMILAR SYMBOL. IN ALL OTHER RESPECTS
<THE L6R MODULE IS IDENTICAL BETWEEN VERSION A00 AND B00.
<IF YOU CUT A P.O. TAPE WITH THE L6G VERSION B00 WITHOUT RE-SYSGENNING,
<YOU MUST SET THE SYMBOL L6GB00 TO 1 TO AVOID GENMD ERRORS ON BOOTING.
<
****************************
05/29/79
< SET M:FREE#GRANS CORRECTLY                                      #32336
, P2PATCH,51F20006+P2PATCH.              KDR F00 05/22/79 001-013 #32336
, P2PATCH+1,69300003+P2PATCH.            KDR F00 05/22/79 002-013 #32336
, P2PATCH+2,20DFFFFC.                    KDR F00 05/22/79 003-013 #32336
, P2PATCH+3,20DFFFFC.                    KDR F00 05/22/79 004-013 #32336
, P2PATCH+4,B5D40005.                    KDR F00 05/22/79 005-013 #32336
, P2PATCH+5,68000BA8+UBCHAN.             KDR F00 05/22/79 006-013 #32336
, P2PATCH+6,0400000.                     KDR F00 05/22/79 007-013 #32336
, P2PATCH+7,00000200.                    KDR F00 05/22/79 008-013 #32336
, P2PATCH+8,00000100.                    KDR F00 05/22/79 009-013 #32336
UBCHAN, UBCHAN+BA7,68000000+P2PATCH(B5D40005).   05/22/79 010-013 #32336
UBCHAN, UBCHAN+156C,F(C).                KDR F00 05/22/79 011-013 #32336
UBCHAN, UBCHAN+C0A,68000C10+UBCHAN.      KDR F00 05/22/79 012-013 #32336
UBCHAN, UBCHAN+C14,70000000.             KDR F00 05/22/79 013-013 #32336
***************************
05/29/79
<THIS PATCH PUTS BACK A TEST FOR EXTERNAL CLIST WHICH WAS REMOVED         #32204
UMOV/HANDLERS+.231/B @(LB,7 IOQ5,3)/    OL  F00 04/09/79 001-005 #32204
/@/INT,7 IOQ8,3/                        OL  F00 04/09/79 002-005 #32204
/@/LB,7 IOQ5,3/                         OL  F00 04/09/79 004-005 #32204
/@/B HANDLERS+.232/                     OL  F00 04/09/79 005-005 #32204
*****************************
05/29/79
#MAXW=58                                 DGH F00 05/29/79 001-031 #32348
< ALLOW 115 IOCD'S IN M:BLIST CAL, FOR VOLINIT CHANGES            #32348
<MAXW IS # OF WORDS IN TSTACK THAT MAY BE USED                    #32348
<                                                                 #32348
<NOTE: INORDER TO MAKE USE OF THIS PATCH, SYSTEM DIAG             #32348
<MUST BE MODIFIED TO LET M:DDCB BUILD THE CLIST AREA              #32348
<TO YOUR SIZE                                                     #32348
<                                                                 #32348
RMAOV/FISH .4F5/LI,5 MAXW-1(LI,5 10/     DGH F00 05/29/79 002-031 #32348
RMAOV/FISH+.4F6/PSW,5 TSTACK(BAL,11 ;Q/  DGH F00 05/29/79 003-031 #32348
RMAOV/FISH+.4F7/LW,14 TSTACK(BNE ;Q/     DGH F00 05/29/79 004-031 #32348
RMAOV/FISH .4F8/B FISH .4FB(BDR,5 ;Q/    DGH F00 05/29/79 005-031 #32348
RMAOV/FISH .4FE/MSP,5 TSTACK(BL FISH .4F9/   F00 05/29/79 006-031 #32348
RMAOV/FISH+.503/MTH,1 *14(MTW,1 *14/     DGH F00 05/29/79 007-031 #32348
RMAOV/FISH .504/B @(LW,2 *14/            DGH F00 05/29/79 008-031 #32348
/@/LH,2 *14/                             DGH F00 05/29/79 009-031 #32348
/@/CI,2 MAXW MAXW/                       DGH F00 05/29/79 010-031 #32348
/@/BL FISH .505/                         DGH F00 05/29/79 011-031 #32348
/@/LI,2 6/                               DGH F00 05/29/79 012-031 #32348
/@/B FISH .2AB/                          DGH F00 05/29/79 013-031 #32348
RMAOV/FISH+.507/B @(STW,0 *14,2/         DGH F00 05/29/79 014-031 #32348
/@/SCS,0 -1/                             DGH F00 05/29/79 015-031 #32348
/@/SCS,0 +1/                             DGH F00 05/29/79 017-031 #32348
/@/B FISH+.508/                          DGH F00 05/29/79 018-031 #32348
RMAOV/FISH .51F/NOP(BGE FISH .2AB/       DGH F00 05/29/79 019-031 #32348
RMAOV/FISH .522/LI,14 -MAXW(LW,14 2,6/   DGH F00 05/29/79 020-031 #32348
RMAOV/FISH+.523/MSP,14 TSTACK(BAL,11 ;Q/ DGH F00 05/29/79 021-031 #32348
RMAOV/FISH+.56B/LH,4 *0(LW,4 *0/         DGH F00 05/29/79 022-031 #32348
RMAOV/FISH+.569/B @(SLS,5 1/             DGH F00 05/29/79 023-031 #32348
/@/LW,11 5/                              DGH F00 05/29/79 024-031 #32348
/@/SLS,5 1/                              DGH F00 05/29/79 025-031 #32348
/@/SLS,11 16/                            DGH F00 05/29/79 026-031 #32348
/@/SAS,11 -16/                           DGH F00 05/29/79 027-031 #32348
/@/B FISH .56A/                          DGH F00 05/29/79 028-031 #32348
RMAOV/FISH+.56C/CH,11 *0,4(CW,5 *0,4/    DGH F00 05/29/79 029-031 #32348
RMAOV/FISH+.581/LH,11 *0(LW,11 *0/       DGH F00 05/29/79 030-031 #32348
#MAXW;K1                                 DGH F00 05/29/79 031-031 #32348
****************************
05/29/79
<BATCH PACK RECONSTRUCT SHOULD NOT CAUSE SC 22'S.                 #31982
FIX1/FIXHGP .BA4/MTH ;Q,5(STH,8 ;Q,5/    PAR F00 11/28/78 001-022 #31982
FIX1/.+1/BAL,11 PT+00(BAL,11 ;Q/         PAR F00 11/28/78 002-022 #31982
FIX1/PT 00/BNE . 2(/                     PAR F00 11/28/78 003-022 #31982
FIX1/PT 01/STH,8 AVRID,5(/               PAR F00 11/28/78 004-022 #31982
FIX1/PT 02/B FIXHGP .BAD(/               PAR F00 11/28/78 005-022 #31982
FIX1/P .76B/BE PT 3(BE *11/              PAR F00 11/28/78 006-022 #31982
FIX1/PT 03/MTB D .141,5(/                PAR F00 11/28/78 007-022 #31982
FIX1/PT 04/BE *11(/                      PAR F00 11/28/78 008-022 #31982
FIX1/FIXHGP .3F0/B PT 6(LW,8 .1FF,6/     PAR F00 11/28/78 010-022 #31982
FIX1/PT 06/MTW D .109(/                  PAR F00 11/28/78 011-022 #31982
FIX1/PT 07/BNE FIXHGP .3F2(/             PAR F00 11/28/78 012-022 #31982
FIX1/PT 08/LW,8 .1FF,6(/                 PAR F00 11/28/78 013-022 #31982
FIX1/PT 09/B FIXHGP .3F1(/               PAR F00 11/28/78 014-022 #31982
FIX1/FIXSUB .70A/LI,5 2(SCS,12 8/        PAR F00 11/28/78 015-022 #31982
FIX1/. 1/LI,4 48(STB,12 0,1/             PAR F00 11/28/78 016-022 #31982
FIX1/. 1/BAL,10 FIXSUB .4C4(AI,1 1/      PAR F00 11/28/78 017-022 #31982
FIX1/. 1/B . 3(SCS,12 8/                 PAR F00 11/28/78 018-022 #31982
FIX1/. 3/CI,5 ;Q(CI,1 ;Q/                PAR F00 11/28/78 019-022 #31982
FIX1/. 3/NOP(STW,1 ;Q/                   PAR F00 11/28/78 020-022 #31982
FIX1/FIXSUB .702/LB,14 0,6(LB,4 0,6/     PAR F00 11/28/78 021-022 #31982
FIX1/FIXSUB .712/BDR,14 ;Q(BDR,4 ;Q/     PAR F00 11/28/78 022-022 #31982
*****************************
05/29/79
<PRIVATE RECONSTRUST SHOULDN'T DELETE GOOD RANDOM FILES.          #32090
FIX1/P .324/;Q+2(AND,4 ;Q/               PAR F00 01/05/79 001_024 #32090
FIX1/P .313/MTW,1 ;Q(AWM,11 ;Q/          PAR F00 01/05/79 002_024 #32090
FIX1/FIXHGP .453/NOP(STW,11 *2,6/        PAR F00 01/05/79 003-024 #32090
FIX1/P .255/BAL,11 PT 12(BAL,11 ;Q/      PAR F00 01/05/79 004-024 #32090
FIX1/PT 12/LW,9 D .1A7(/                 PAR F00 01/05/79 005-024 #32090
FIX1/PT 13/AI,9 -3(/                     PAR F00 01/05/79 006-024 #32090
FIX1/PT 14/BNE FIXHGP .C23(/             PAR F00 01/05/79 007-024 #32090
FIX1/PT 15/STW,9 FIXHD .52(/             PAR F00 01/05/79 008-024 #32090
FIX1/PT 16/LCI 3(/                       PAR F00 01/05/79 009-024 #32090
FIX1/PT 17/LM,9 FIXHD .15(/              PAR F00 01/05/79 010-024 #32090
FIX1/PT 19/STM,9 FIXHD .18(/             PAR F00 01/05/79 012-024 #32090
FIX1/PT 20/STM,12 FIXHD .15(/            PAR F00 01/05/79 013-024 #32090
FIX1/PT 21/BAL,11 FIXHGP .C23(/          PAR F00 01/05/79 014-024 #32090
FIX1/PT 22/LW,11 FIXHD .51(/             PAR F00 01/05/79 015-024 #32090
FIX1/PT 23/SW,11 FIXHD .50(/             PAR F00 01/05/79 016-024 #32090
FIX1/PT 24/STW,11 FIXHD .52(/            PAR F00 01/05/79 017-024 #32090
FIX1/PT 25/LCI 3(/                       PAR F00 01/05/79 018-024 #32090
FIX1/PT 26/LM,9 FIXHD .15(/              PAR F00 01/05/79 019-024 #32090
FIX1/PT 27/LM,12 FIXHD .18(/             PAR F00 01/05/79 020-024 #32090
FIX1/PT 28/STM,9 FIXHD .18(/             PAR F00 01/05/79 021-024 #32090
FIX1/PT 29/STM,12 FIXHD .15(/            PAR F00 01/05/79 022-024 #32090
FIX1/PT 30/LC 15(/                       PAR F00 01/05/79 023-024 #32090
FIX1/PT 31/B P .256(/                    PAR F00 01/05/79 024-024 #32090
****************************
05/29/79
<MAKE THE AUTO HANGUP/ AUTO DIALUP CODE WORK FASTER WITH FECP     #32374
<LINES                                                            #32374
#REGCOC                                  DGH F00 04/19/79 001-022 #32374
#U@1492=COCU+.286                        DGH F00 04/19/79 002-022 #32374
#U@1566=COCU+.2B8                        DGH F00 04/19/79 003-022 #32374
#TPCOC                                   DGH F00 04/19/79 004-022 #32374
#U@1492=COCU+.2E8                        DGH F00 04/19/79 005-022 #32374
#U@1566=COCU+.323                        DGH F00 04/19/79 006-022 #32374
#L6R                                     DGH F00 04/19/79 007-022 #32374
#ELSE                                    DGH F00 04/19/79 008-022 #32374
#U@1492=0                                DGH F00 04/19/79 009-022 #32374
#1                                       DGH F00 04/19/79 010-022 #32374
#U@1492                                  DGH F00 04/19/79 011-022 #32374
UMOV/U@1492/B @(LI,11 2/                 DGH F00 04/19/79 012-022 #32374
/@/EXU U@1492+.2DD-.2E8/                 DGH F00 04/19/79 013-022 #32374
/@/BGE . 3/                              DGH F00 04/19/79 014-022 #32374
/@/LI,11 2/                              DGH F00 04/19/79 015-022 #32374
/@/B U@1492+1/                           DGH F00 04/19/79 016-022 #32374
/@/LW,11 L6R,3/                          DGH F00 04/19/79 017-022 #32374
/@/LW,6 10/                              DGH F00 04/19/79 018-022 #32374
/@/LC *11,6/                             DGH F00 04/19/79 019-022 #32374
/@/BCS,3 U@1566/                         DGH F00 04/19/79 020-022 #32374
/@/B U@1492+.290-.286/                   DGH F00 04/19/79 021-022 #32374
#U@1492;KU@1566;K1                       DGH F00 04/19/79 022-022 #32374
**************************
05/29/79
<******NOTE-- THIS VERSION OF SIDR #32008 IS AN UPDATE AND REPLACES
<THE OLDER VERSION DATED 04/11/79.
<PCL SHOULD SET THE STEP CCS IF ERRORS OCCUR DURING COPYALL/STD.  #32008
,PCL+53,22400050(69300046+PCL).          PAR F00 05/29/79 001-009 #32008
,PCL+56,68000048+PCL(68000046+PCL).      PAR F00 05/29/79 002-009 #32008
,COPYALL+BF,6AB00013+PATCH(6AB00000+HEX2BCD).F00 05/29/79 003-009 #32008
,PATCH+13,22D00002.                      PAR F00 05/29/79 004-009 #32008
,PATCH+14,31D0004E+BREAK.                PAR F00 05/29/79 005-009 #32008
,PATCH+15,68200000+HEX2BCD.              PAR F00 05/29/79 006-009 #32008
,PATCH+16,35D0004E+BREAK.                PAR F00 05/29/79 007-009 #32008
,PATCH+17,68000000+HEX2BCD.              PAR F00 05/29/79 008-009 #32008
,COPYTRAN+26F,84000019(4000019).         PAR F00 05/29/79 009-009 #32008
*************************
04/23/79
< FIX VFC FOR CHANNELS >7.                                        #31540
/WRTD+.89/CI,14 .F(CI,14 .7)/            FJ  F00 04/04/79 001-001 #31540
04/23/79
<PCL SHOULD SET THE STEP CCS IF ERRORS OCCUR DURING COPYALL/STD.  #32008
,PCL+53,22400050(69300046+PCL).          PAR F00 04/11/79 001-009 #32008
,PCL+56,68000048+PCL(68000046+PCL).      PAR F00 04/11/79 002-009 #32008
,COPYALL+BF,6AB00013+PATCH(6AB00000+HEX2BCD).F00 04/11/79 003-009 #32008
,PATCH+13,22D00002.                      PAR F00 04/11/79 004-009 #32008
,PATCH+14,231D004E+BREAK.                PAR F00 04/11/79 005-009 #32008
,PATCH+15,68200000+HEX2BCD.              PAR F00 04/11/79 006-009 #32008
,PATCH+16,35D0004E+BREAK.                PAR F00 04/11/79 007-009 #32008
,PATCH+17,68000000+HEX2BCD.              PAR F00 04/11/79 008-009 #32008
,COPYTRAN+26F,84000019(4000019).         PAR F00 04/11/79 009-009 #32008
04/233/79
< REPLACEMENT PATCH FOR ONE DATED 10/10/78 WHICH SHOULD BE        #27817
< REMOVED. DON'T BLOCK QUEUE AT E PRIO. STOP AUTO INCR AT E PRIO. #27817
:GENMD,RBBAT MBSOP+1D0,2140000E(2140000F).   F00 04/10/79 001-002 #27817
:GENMD,RBBAT MBSOP+1D1,692001DF+MBSOP(681001DF+MBSOP).    002-002 #27817
04/23/79
#L6R
#L6GA00=1
#
#L6GB00
#L6GA00=0
#
<L6GA00 AND L6GB00 REFLECT WHICH VERSION OF L6R WAS INCLUDED IN
<THE MONITOR LOAD.  L6R VERSION B00 DEFINES THE SYMBOL L6GB00 AS 1.
<L6R VERSION A00 DEFINES NO SIMILAR SYMBOL. IN ALL OTHER RESPECTS
<THE L6R MODULE IS IDENTICAL BETWEEN VERSION A00 AND B00.
<IF YOU CUT A P.O. TAPE WITH THE L6G VERSION B00 WITHOUT RE-SYSGENNING,
<YOU MUST SET THE SYMBOL L6GB00 TO 1 TO AVOID GENMD ERRORS ON BOOTING.
<
#L6GA00
<PATCHES TO A00 VERSION GO HERE
GENMD L6G
DELETE
<L6G MAY SOMETIMES GET WATCHDOG TIMER ERRORS WHEN TOO MANY BITS   #31669
<HAVE BEEN PICKED BY THE COUPLER. THE PATCH WILL STOP THE WATCHDOG#31669
<TIMERS AND ALLOW THE MESSAGE TO BE RETRIED.                      #31669
,CPAGE+1C3,22500F01(22500001).CALCPACL   DGH A00 03/01/79 001-005 #31669
,CPAGE+1C5,684001C9(68480000).           DGH A00 03/01/79 002-005 #31669
,CPAGE+1C6,4B500006(6B500006).           DGH A00 03/01/79 003-005 #31669
,L6G+39E,81(80).INCREASE#WORDS TO RELOC  DGH A00 03/01/79 004-005 #31669
,L6G+41F,1C5+CPAGE.RELOC THIS WORD       DGH A00 03/01/79 005-005 #31669
04/23/79/
<MAKE L6G VERS A00 WORK WITH MULTIPLE L6 FECP'S. THE FIRST 4 LINES#31670
<FIX THE DISCONNECT KEYIN. THE NEXT 13 LINES CORRECT PROBLEM WITH #31670
<KEEPING THE CO:HIIL INPUT ARMED WHEN FECP#1 IS DISCONNECTED      #31670
<AND FECP#2 IS STILL CONNECTED, WHILE STILL DIARMING ALL          #31670
<INTERRUPTS UPON EXIT.                                            #31670
,+BAA9,05000000+SPAGE(05000000+CPAGE).   DGH A00 02/22/79 001-017 #31670
,+BAAB,0+SPAGE(0+CPAGE).                 DGH A00 02/22/79 002-017 #31670
,+BAAC,05000000+SPAGE(05000000+CPAGE).   DGH A00 02/22/79 003-017 #31670
,+BAAE,0+SPAGE(0+CPAGE).                 DGH A00 02/22/79 004-017 #31670
,L6G+2E3,22300000+LCOC(22300000+L6#FIRST).   F00 02/22/79 005-017 #31670
,L6G+2E9,203FFFFF(20300001).             DGH A00 02/22/79 006-017 #31670
,L6G+2EA,21300000+L6#FIRST(21300000+LCOC).   F00 02/22/79 007-017 #31670
,L6G+2EB,683002E4+L6G(682002E4+L6G).     DGH A00 02/22/79 008-017 #31670
,L6G+310,68000000+PATCH(32560000+CO:IIL).DGH A00 02/22/79 009-017 #31670
,PATCH+0,22500000(0).                    DGH A00 02/22/79 010-017 #31670
,PATCH+1,21300000+LCOC(0).               DGH A00 02/22/79 011-017 #31670
,PATCH+3,22200000+LCOC(0).               DGH A00 02/22/79 013-017 #31670
,PATCH+4,33040005+00:L6G(0).             DGH A00 02/22/79 014-017 #31670
,PATCH+5,69300311+L6G(0).                DGH A00 02/22/79 015-017 #31670
,PATCH+6,32560000+CO:IIL(0).             DGH A00 02/22/79 016-017 #31670
,PATCH+7,68000311+L6G(0).                DGH A00 02/22/79 017-017 #31670
#
#L6GB00
<PATCHES TO B00 VERSION GO HERE.
#
*************************
04/06/79
< PREVENT SC 7E-40 WHEN RBBAT RUNS OUT OF SN SPACE                #32219
,RBBP+E2,09A00000+TMPSTK(0).             FJ  F00 03/28/79 001-004 #32219
,RBBP+E3,680007F9+RBG(0).                FJ  F00 03/28/79 002-004 #32219
,RBG+D5E,680000E2+RBBP(6AB007F9+RBG).    FJ  F00 03/28/79 003-004 #32219
,RBG+D61,08B00000+TMPSTK(32B0000A).      FJ  F00 03/28/79 004-004 #32219
************************* SST 4-79 ********************************
**********************
03/15/79
<    Reset prompt character back to default during M:LINK         #29755
<    and during non-return M:LDTRCs.                              #29755
LDLNK/LNKTRC+.33A/B @(LI,2 0/            DCP F00 03/07/79 001-006 #29755
/@/LH,2 JIT+.3A/                         DCP F00 03/07/79 002-006 #29755
/@/LI,3 .FF/                             DCP F00 03/07/79 003-006 #29755
/@/STS,2 JIT+.46/                        DCP F00 03/07/79 004-006 #29755
/@/LI,2 0/                               DCP F00 03/07/79 005-006 #29755
/@/B LNKTRC+.33B/                        DCP F00 03/07/79 006-006 #29755
03/15/79
<CHANGE DRIVE CHECK(DEVICE FAULT) FROM OPERATOR TO ERROR.         #31668
#MPCTIO                                  KRD F00 02/26/79 001-003 #31668
UMOV/MPCTIO+.12B/.00030000(.01030000/    KRD F00 02/26/79 002-003 #31668
*********************
03/13/79
< GIVE LTAPE BETTER ABILITY TO HANDLE NOISE RECORDS ON ANS TAPES. #32189
< ALSO LOAD THE PROPER REGISTER BEFORE CALL TO T:RBUF             #32189
LTAPE/ARDL+.B/B @(LW,7 .11,6)/           PAR F00 02/26/79 001-014 #32189
/@/LW,7 .11,6/                           PAR F00 02/26/79 002-014 #32189
/@/CW,1 ARDL+1/                          PAR F00 02/26/79 003-014 #32189
/@/BE ARDL+.C/                           PAR F00 02/26/79 004-014 #32189
/@/CW,1 @+.06/                           PAR F00 02/26/79 005-014 #32189
/@/BE ARDL+.C/                           PAR F00 02/26/79 006-014 #32189
/@/BAL,9 RDL+.F6/                        PAR F00 02/26/79 007-014 #32189
/@/BAL,11 IORT+.336/                     PAR F00 02/26/79 008-014 #32189
/@/LI,10 0/                              PAR F00 02/26/79 009-014 #32189
/@/B ARDL+.5D/                           PAR F00 02/26/79 010-014 #32189
/@/.7AC5D6C6/                            PAR F00 02/26/79 011-014 #32189
LTAPE/ARDL+.AB/BAL,2 @(BAL,2 ;Q)/        PAR F00 02/26/79 012-014 #32189
/@/LW,14 11/                             PAR F00 02/26/79 013-014 #32189
/@/B MM+.4D4/                            PAR F00 02/26/79 014-014 #32189
03/13/79
< !EOD CARDS WITHIN JCL DECKS SUBMITTED FROM REMOTE WORKSTATIONS  #32175
< NEED TO BE FLAGGED AS SUCH.                                     #32175
UMOV/INSYM+.7F/B @(CI,13 1)/             FJ  F00 02/14/79 001-004 #32175
/@/BE INSYM+.8B/                         FJ  F00 02/14/79 002-004 #32175
/@/CI,13 1/                              FJ  F00 02/14/79 003-004 #32175
/@/B INSYM+.80/                          FJ  F00 02/14/79 004-004 #32175
************************* SST 3-79 ****************************
***********************
02/28/79
< REPLACEMENT PATCH FOR #31611 DATED 09/28/78                     #31611
< *** SOLVES 7E-40 DURING PFSR *******************                #31611
< SOLVES THE "TOPROOT MUST BE BELOW X'8000'" RESTRICTION          #31611
< =====> NOTE: THIS PATCH DEPENDS ON A SPARE CELL AT THE END      #31611
<              OF COCD (COCD+.59)                                 #31611
< ***********************************************************     #31611
< MAKE MOS INITIALIZATION RUN UNMAPPED..AND THUS USABLE BY GHOST1 #31611
< AND CONTROL                                                     #31611
< 3 PATCHES, 1 TO ROOT/INITIAL, 1 TO GHOST11, 1 GENMD TO CONTROL  #31611
/@@/TUNA! $+3/                           JLJ F00 01/11/79 001-024 #31611
/@/.07000000/                            JLJ F00 01/11/79 002-024 #31611
/@/LPSD,0 TUNA/                          JLJ F00 01/11/79 003-024 #31611
/@/B INITIAL+.5C/                        JLJ F00 01/11/79 004-024 #31611
/INITIAL+.8F/B @(B *11/                  JLJ F00 01/11/79 005-024 #31611
/@/CI,11 PFSR+.A0/                       JLJ F00 01/11/79 006-024 #31611
/@/BE $+2/                               JLJ F00 01/11/79 007-024 #31611
/@/BAL,1 MAP/                            JLJ F00 01/11/79 008-024 #31611
/@/WD,0 .27/                             JLJ F00 01/11/79 009-024 #31611
/@/B *11/                                JLJ F00 01/11/79 010-024 #31611
/COCD+.59/B TUNA+.2/                     JLJ F00 01/11/79 011-024 #31611
/PFSR+.9F/BAL,11 COCD+.59(BAL,11 INITIAL+.5C/F00 01/11/79 012-024 #31611
#TUNA;K1                                 JLJ F00 01/11/79 013-024 #31611
< REPLACEMENT PATCH FOR #31611 DATED 09/28/78                     #31611
< *** SOLVES 7E-40 DURING PFSR *******************                #31611
< SOLVES THE "TOPROOT MUST BE BELOW X'8000'" RESTRICTION          #31611
< =====> NOTE: THIS PATCH DEPENDS ON A SPARE CELL AT THE END      #31611
< ***********************************************************     #31611
GHOST11/GHOST1D+.D8/BAL,11 COCD+.59(BAL,11 INITIAL+.5C/   014-024 #31611
< REPLACEMENT PATCH FOR #31611 DATED 09/28/78                     #31611
< *** SOLVES 7E-40 DURING PFSR *******************                #31611
< SOLVES THE "TOPROOT MUST BE BELOW X'8000'" RESTRICTION          #31611
< =====> NOTE: THIS PATCH DEPENDS ON A SPARE CELL AT THE END      #31611
<              OF COCD (COCD+.59)                                 #31611
< ***********************************************************     #31611
< MEMORY.....PERFORM THIS ACTION IN THE MONITOR ROOT...           #31611
< 2 PATCHES, 1 TO ROOT/INITIAL, 1 GENMD TO CONTROL                #31611
:GENMD,CONTROL MOS+1AE,02000000.         JLJ F00 01/11/79 015-024 #31611
:GENMD,CONTROL MOS+1AF,02000000.         JLJ F00 01/11/79 016-024 #31611
:GENMD,CONTROL MOS+1B0,02000000.         JLJ F00 01/11/79 017-024 #31611
:GENMD,CONTROL MOS+1B2,68000000+MOS:PP.  JLJ F00 01/11/79 018-024 #31611
:GENMD,CONTROL MOS:PP+0,22400001(00000BAD).  F00 01/11/79 019-024 #31611
:GENMD,CONTROL MOS:PP+1,35B00007(00000BAD).  F00 01/11/79 020-024 #31611
:GENMD,CONTROL MOS:PP+2,6AB00059+COCD:(00000BAD).01/11/79 021-024 #31611
:GENMD,CONTROL MOS:PP+3,32B00007(00000BAD).  F00 01/11/79 022-024 #31611
:GENMD,CONTROL MOS:PP+4,6D000027(00000BAD).  F00 01/11/79 023-024 #31611
:GENMD,CONTROL MOS:PP+5,680001B3+MOS(00000BAD).  01/11/79 024-024 #31611
**********************
02/23/79
<MAKE SURE FECP COUPLER ERRORS ARE REPORTED AND RECOVERED FROM    #31659
<CORRECTLY. THE 'RD/WD INSTRUCTION FAILED' WILL STILL COME OUT ON #31659
<THE O.C. BUT NO CORRECTIVE ACTION NEED BE DONE BY THE OPERATOR.  #31659
,L6G+88,6820003D+L6G(6820003E+L6G).      DGH F00 02/22/79 001-007 #31659
,CPAGE+22,6C640003(4642002D).            DGH F00 02/22/79 003-007 #31659
,CPAGE+23,4642002D(6C640003).            DGH F00 02/22/79 004-007 #31659
,CPAGE+DC,3552002D(32560000+CO:OIL).     DGH F00 02/22/79 005-007 #31659
,CPAGE+DD,02000000(6D501100+COA:IG).     DGH F00 02/22/79 006-007 #31659
,CPAGE+DE,680001D8(68000064).            DGH F00 02/22/79 007-007 #31659
***********************
02/22/79
< ALLOW THE PAGE STATEMENT IN BASIC TO FUNCTION PROPERLY WHEN IT  #32117
< IS DIRECTED TO A COC DEVICE. (M:DEVICE M:UC,(PAGE)) I SURMISE.  #32117
/IOD+.B7/BE @(BE IOD+.AE)/               FJ  F00 01/18/79 001-014 #32117
/@/BAL,11 IORT+.1B1/                     FJ  F00 01/18/79 002-014 #32117
/@/NOP 1/                                FJ  F00 01/18/79 003-014 #32117
/@/MTB,0 .8C46/                          FJ  F00 01/18/79 004-014 #32117
/@/BEZ IOD+.B2/                          FJ  F00 01/18/79 005-014 #32117
/@/LI,1 .10000/                          FJ  F00 01/18/79 006-014 #32117
/@/STS,1 0,6/                            FJ  F00 01/18/79 007-014 #32117
/@/LI,14 .D1/                            FJ  F00 01/18/79 008-014 #32117
/@/BAL,4 WRTD+.6E/                       FJ  F00 01/18/79 009-014 #32117
/@/BAL,11 WRTD+.244/                     FJ  F00 01/18/79 010-014 #32117
/@/LI,15 .D1/                            FJ  F00 01/18/79 011-014 #32117
/@/STB,15 *14/                           FJ  F00 01/18/79 012-014 #32117
/@/LI,2 1/                               FJ  F00 01/18/79 013-014 #32117
/@/B WRTD+.68/                           FJ  F00 01/18/79 014-014 #32117
02/22/79
<  If a C0 user issues an M:DMOD# or similar service request,     #31843
<  FISH sets DID=S:CUN even if DID wasn't zero (i.e., another     #31843
<  diagnostic user running). This can cause an authorized         #31843
<  diagnostic user to get aborted with 09-0A error when he        #31843
<  shouldn't be - diagnostic DCBs don't get closed properly.      #31843
<  Running a job that needs a private spindle in a C0 account     #31843
<  can induce this since CCI uses a variant of M:DMOD# for its    #31843
<  resource limit check. N.B. and caveat - the design of          #31843
<  the diagnostic I/O system does not permit more than 1          #31843
<  diagnostic user at a time!!                                    #31843
RMAOV/FISH+.106/B @ (STW,15 TABLES+.20D/ DCP F00 01/08/79 001-006 #31843
/@/MTW,0 TABLES+.20D/                    DCP F00 01/08/79 002-006 #31843
/@/BNEZ @+2/                             DCP F00 01/08/79 003-006 #31843
/@/STW,15 TABLES+.20D/                   DCP F00 01/08/79 004-006 #31843
/@/B FISH+.107/                          DCP F00 01/08/79 005-006 #31843
<  Incorrect literal causes 09-0A code to get reported to the     #31843
<  user as an 09-14 error (whazzat?)                              #31843
RMAOV/FISH+.5C7/.0A000009 (.14000009/    DCP F00 01/08/79 006-006 #31843
02/22/79
<TAPES GENERATED BY STAND-ALONE DEVDMP ARE UNBOOTABLE W/O THIS FIX.       #32150
<THEREFORE, AFTER GENMDING THE CP-V RESIDENT LM, GENERATE A NEW DEVDMP    #32150
<MASTER TAPE BY RUNNING DEVDMP ON-LINE WITH F:BOOT PROPERLY ASSIGNED.     #32150
,+A0B1,6800B2B1(3560AEDB).              OL  F00  01/17/79 001-004 #32150
,+B2B1,3560AEDB.                        OL  F00  01/17/79 002-004 #32150
,+B2B2,3560AEEB.                        OL  F00  01/17/79 003-004 #32150
,+B2B3,6800A0B2.                        OL  F00  01/17/79 004-004 #32150
*********************
02/21/79
< REPLACEMENT PATCH FOR THE ONE DATED 9/25/79 WHICH MUST BE       #31634
< REMOVED. 18 CARDS TO WRTD IN ROOT AND 1 CARD TO OPNLD IN MULOV. #31634
< VERSION OF 31634, FOR 31630 TO FUNCTION PROPERLY.               #31634
/WRTD+.1C4/B @(LW,12 JIT,1)/             FJ  F00 01/17/79 001-019 #31634
/@/CI,1 .19/                             FJ  F00 01/17/79 002-019 #31634
/@/BE @+05/                              FJ  F00 01/17/79 003-019 #31634
/@/CI,1 .1B/                             FJ  F00 01/17/79 004-019 #31634
/@/BE @+03/                              FJ  F00 01/17/79 005-019 #31634
/@/LW,12 JIT,1/                          FJ  F00 01/17/79 006-019 #31634
/@/B WRTD+.1C5/                          FJ  F00 01/17/79 007-019 #31634
/@/LW,12 .1F,5/                          FJ  F00 01/17/79 008-019 #31634
/@/CI,12 .10/                            FJ  F00 01/17/79 009-019 #31634
/@/BANZ @-4/                             FJ  F00 01/17/79 010-019 #31634
/@/LW,12 JIT,1/                          FJ  F00 01/17/79 011-019 #31634
/@/SLD,12 -17/                           FJ  F00 01/17/79 012-019 #31634
/@/CI,12 0/                              FJ  F00 01/17/79 013-019 #31634
/@/BNE @-8/                              FJ  F00 01/17/79 014-019 #31634
/@/LI,12 1/                              FJ  F00 01/17/79 015-019 #31634
/@/SLD,12 17/                            FJ  F00 01/17/79 016-019 #31634
/@/STW,12 JIT,1/                         FJ  F00 01/17/79 017-019 #31634
/@/B @-.C/                               FJ  F00 01/17/79 018-019 #31634
< REPLACEMENT PATCH FOR THE ONE DATED 9/25/79 WHICH MUST BE       #31634
< REMOVED. 18 CARDS TO WRTD IN ROOT AND 1 CARD TO OPNLD IN MULOV. #31634
< NOTE, IF USING LINES0 OPTION OF 31630, YOU MUST USE THIS        #31634
< VERSION OF 31634, FOR 31630 TO FUNCTION PROPERLY.               #31634
MULOV/OPNLD+.459/LI,11 .FF(LI,11 2)/     FJ  F00 01/17/79 019-019 #31634
02/21/79
<       REMOVED. THE SIZE OF THE PATCH MAY BE MISLEADING  ******  #31630
< $$$$$ READ FILE 31630INFO ON THE SST FOR FULL DETAIL.  $$$$$$   #31630
< ##### AS PATCH IS DEFAULT IMPLEMENTED, IT ONLY FIXES A  ######  #31630
< ##### A SLIGHT BUG IN PAGE NUMBER LOGIC. IT ALSO FIXES  #####   #31630
< ##### A MISTAKE IN PAGE ACCOUNTING IN PREVIOUS VERSIONS #####   #31630
< %%%%% 257 CARDS IN MULOV WHICH ALSO PATCHES ROOT        %%%%%%  #31630
< %%%%% 027 CARDS IN LDEV PROCESSOR. SIZE OF PATCH VARIES %%%%%%  #31630
< %%%%% 011 CARDS IN RBBAT (REQUIRES FULL BOOT TO ADD     %%%%%%  #31630
< %%%%% OR REMOVE EFFECT OF FORM MESSAGE CHANGE)          %%%%%%  #31630
#LINES0-1                                FJ  F00 01/17/79 001-295 #31630
#DFLTPC=@                                FJ  F00 01/17/79 002-295 #31630
/@/0/                                    FJ  F00 01/17/79 003-295 #31630
#GFORML=@                                FJ  F00 01/17/79 004-295 #31630
/@/PSW,5 TSTACK/                         FJ  F00 01/17/79 005-295 #31630
/@/PSW,4 TSTACK/                         FJ  F00 01/17/79 006-295 #31630
/@/AI,5 0/                               FJ  F00 01/17/79 007-295 #31630
/@/BEZ @+.0C/                            FJ  F00 01/17/79 008-295 #31630
/@/LI,4 .FF00/                           FJ  F00 01/17/79 009-295 #31630
/@/SLS,4 8/                              FJ  F00 01/17/79 010-295 #31630
/@/CW,4 .F,5/                            FJ  F00 01/17/79 011-295 #31630
/@/BAZ @+.08/                            FJ  F00 01/17/79 012-295 #31630
/@/LW,4 .18,5/                           FJ  F00 01/17/79 013-295 #31630
/@/SLS,4 -24/                            FJ  F00 01/17/79 014-295 #31630
/@/LI,5 .100/                            FJ  F00 01/17/79 015-295 #31630
/@/CW,5 COMBAT/                          FJ  F00 01/17/79 016-295 #31630
/@/BAZ @+.1A/                            FJ  F00 01/17/79 017-295 #31630
/@/STB,4 *TSTACK/                        FJ  F00 01/17/79 018-295 #31630
/@/B @+.04/                              FJ  F00 01/17/79 019-295 #31630
/@/LI,4 6/                               FJ  F00 01/17/79 020-295 #31630
/@/LB,4 TB:SZ,4/                         FJ  F00 01/17/79 021-295 #31630
/@/STB,4 DFLTPC/                         FJ  F00 01/17/79 022-295 #31630
/@/LI,5 .10/                             FJ  F00 01/17/79 023-295 #31630
/@/CW,5 COMBAT/                          FJ  F00 01/17/79 024-295 #31630
/@/BAZ @+.12/                            FJ  F00 01/17/79 025-295 #31630
/@/LI,4 0/                               FJ  F00 01/17/79 026-295 #31630
/@/LI,5 -1/                              FJ  F00 01/17/79 027-295 #31630
/@/LW,5 *TSTACK,5/                       FJ  F00 01/17/79 028-295 #31630
/@/AI,5 0/                               FJ  F00 01/17/79 029-295 #31630
/@/BEZ @+2/                              FJ  F00 01/17/79 030-295 #31630
/@/LW,4 .19,5/                           FJ  F00 01/17/79 031-295 #31630
/@/LI,5 S:ZLINE-S:FORMS/                 FJ  F00 01/17/79 032-295 #31630
/@/CW,4 S:FORMS-1,5/                     FJ  F00 01/17/79 033-295 #31630
/@/BE @+2/                               FJ  F00 01/17/79 034-295 #31630
/@/BDR,5 @-2/                            FJ  F00 01/17/79 035-295 #31630
/@/CI,5 S:ZLINE-S:FORMS/                 FJ  F00 01/17/79 036-295 #31630
/@/BE @+6/                               FJ  F00 01/17/79 037-295 #31630
/@/CI,5 0/                               FJ  F00 01/17/79 038-295 #31630
/@/BE @+4/                               FJ  F00 01/17/79 039-295 #31630
/@/LB,4 S:ZLINE,5/                       FJ  F00 01/17/79 040-295 #31630
/@/XW,4 *TSTACK/                         FJ  F00 01/17/79 041-295 #31630
/@/LB,4 *TSTACK/                         FJ  F00 01/17/79 043-295 #31630
/@/BNEZ @-3/                             FJ  F00 01/17/79 044-295 #31630
/@/LB,4 DFLTPC/                          FJ  F00 01/17/79 045-295 #31630
/@/B @-.05/                              FJ  F00 01/17/79 046-295 #31630
/WRTD+.79/BAL,4 WRTD+.1F8/               FJ  F00 01/17/79 047-295 #31630
/. 1/B @(LI,14 .F1/                      FJ  F00 01/17/79 048-295 #31630
/@/BAL,4 GFORML/                         FJ  F00 01/17/79 049-295 #31630
/@/PLW,4 TSTACK/                         FJ  F00 01/17/79 050-295 #31630
/@/PLW,5 TSTACK/                         FJ  F00 01/17/79 051-295 #31630
/@/AI,0 0/                               FJ  F00 01/17/79 052-295 #31630
/@/BNEZ @+7/                             FJ  F00 01/17/79 053-295 #31630
/@/AI,5 0/                               FJ  F00 01/17/79 054-295 #31630
/@/BEZ @+4/                              FJ  F00 01/17/79 055-295 #31630
/@/CI,15 0/                              FJ  F00 01/17/79 056-295 #31630
/@/BNEZ WRTD+.7F/                        FJ  F00 01/17/79 057-295 #31630
/@/B @+.08/                              FJ  F00 01/17/79 058-295 #31630
/@/LB,0 DFLTPC/                          FJ  F00 01/17/79 059-295 #31630
/@/CW,4 0/                               FJ  F00 01/17/79 060-295 #31630
/@/BG @+2/                               FJ  F00 01/17/79 061-295 #31630
/@/XW,4 0/                               FJ  F00 01/17/79 062-295 #31630
/@/CI,15 0/                              FJ  F00 01/17/79 063-295 #31630
/@/BEZ @+3/                              FJ  F00 01/17/79 064-295 #31630
/@/CW,0 .F/                              FJ  F00 01/17/79 065-295 #31630
/@/BGE WRTD+.7F/                         FJ  F00 01/17/79 066-295 #31630
/@/LI,14 .F1/                            FJ  F00 01/17/79 067-295 #31630
/@/B WRTD+.7B/                           FJ  F00 01/17/79 068-295 #31630
/WRTD+.95/BAL,4 GFORML/                  FJ  F00 01/17/79 069-295 #31630
/. 1/PLW,4 TSTACK/                       FJ  F00 01/17/79 070-295 #31630
/. 1/PLW,5 TSTACK/                       FJ  F00 01/17/79 071-295 #31630
/. 1/AI,5 0/                             FJ  F00 01/17/79 072-295 #31630
/. 1/BEZ @/                              FJ  F00 01/17/79 073-295 #31630
/. 1/B @+.0E/                            FJ  F00 01/17/79 074-295 #31630
/@/AI,0 0/                               FJ  F00 01/17/79 075-295 #31630
/@/BNEZ @+.02/                           FJ  F00 01/17/79 076-295 #31630
/@/LB,0 DFLTPC/                          FJ  F00 01/17/79 077-295 #31630
/@/CW,4 0/                               FJ  F00 01/17/79 078-295 #31630
/@/BG $+2/                               FJ  F00 01/17/79 079-295 #31630
/@/XW,4 0/                               FJ  F00 01/17/79 080-295 #31630
/@/CW,0 .F/                              FJ  F00 01/17/79 081-295 #31630
/@/BL WRTD+.9F/                          FJ  F00 01/17/79 082-295 #31630
/@/MTB,0 *TSTACK/                        FJ  F00 01/17/79 083-295 #31630
/@/BGZ @+2/                              FJ  F00 01/17/79 084-295 #31630
/@/AI,15 1/                              FJ  F00 01/17/79 085-295 #31630
/@/CW,0 .F/                              FJ  F00 01/17/79 086-295 #31630
/@/BGE WRTD+.9D/                         FJ  F00 01/17/79 087-295 #31630
/@/B WRTD+.9C/                           FJ  F00 01/17/79 088-295 #31630
/@/AI,0 0/                               FJ  F00 01/17/79 089-295 #31630
/@/BNEZ @-.0C/                           FJ  F00 01/17/79 090-295 #31630
/@/MTB,0 *TSTACK/                        FJ  F00 01/17/79 091-295 #31630
/@/BGZ @+2/                              FJ  F00 01/17/79 092-295 #31630
/@/CW,4 .F/                              FJ  F00 01/17/79 094-295 #31630
/@/BGE WRTD+.9D/                         FJ  F00 01/17/79 095-295 #31630
/@/LCI .50/                              FJ  F00 01/17/79 096-295 #31630
/@/PSM,12 TSTACK/                        FJ  F00 01/17/79 097-295 #31630
/@/AI,5 0/                               FJ  F00 01/17/79 098-295 #31630
/@/BEZ @+2/                              FJ  F00 01/17/79 099-295 #31630
/@/MTW,1 .17,5/                          FJ  F00 01/17/79 100-295 #31630
/@/BAL,0 WRTD+.1BF/                      FJ  F00 01/17/79 101-295 #31630
/@/LCI .50/                              FJ  F00 01/17/79 102-295 #31630
/@/PLM,12 TSTACK/                        FJ  F00 01/17/79 103-295 #31630
/@/B WRTD+.9C/                           FJ  F00 01/17/79 104-295 #31630
#ELSE                                    FJ  F00 01/17/79 105-295 #31630
/WRTD+.7A/B @(LI,14 .F1)/                FJ  F00 01/17/79 106-295 #31630
/@/BAL,4 WRTD+.1F8/                      FJ  F00 01/17/79 107-295 #31630
/@/BEZ WRTD+.7F/                         FJ  F00 01/17/79 108-295 #31630
/@/LI,14 .F1/                            FJ  F00 01/17/79 109-295 #31630
/@/B WRTD+.7B/                           FJ  F00 01/17/79 110-295 #31630
/WRTD+.95/B @(CW,0 15)/                  FJ  F00 01/17/79 111-295 #31630
/@/BEZ WRTD+.97/                         FJ  F00 01/17/79 112-295 #31630
/@/CW,0 15/                              FJ  F00 01/17/79 113-295 #31630
/@/BL @-6/                               FJ  F00 01/17/79 114-295 #31630
/@/B WRTD+.97/                           FJ  F00 01/17/79 115-295 #31630
/WRTD+.99/B @(AI,15 1)/                  FJ  F00 01/17/79 116-295 #31630
/@/AI,15 1/                              FJ  F00 01/17/79 117-295 #31630
/@/AI,0 0/                               FJ  F00 01/17/79 118-295 #31630
/@/BNEZ WRTD+.9A/                        FJ  F00 01/17/79 119-295 #31630
/@/PSW,4 TSTACK/                         FJ  F00 01/17/79 120-295 #31630
/@/LI,4 6/                               FJ  F00 01/17/79 121-295 #31630
/@/CB,15 TB:SZ,4/                        FJ  F00 01/17/79 122-295 #31630
/@/BL @+.0B/                             FJ  F00 01/17/79 123-295 #31630
/@/PLW,4 TSTACK/                         FJ  F00 01/17/79 124-295 #31630
/@/AI,5 0/                               FJ  F00 01/17/79 125-295 #31630
/@/BEZ @+2/                              FJ  F00 01/17/79 126-295 #31630
/@/MTW,1 .17,5/                          FJ  F00 01/17/79 127-295 #31630
/@/LCI .50/                              FJ  F00 01/17/79 128-295 #31630
/@/PSM,12 TSTACK/                        FJ  F00 01/17/79 129-295 #31630
/@/BAL,0 WRTD+.1BF/                      FJ  F00 01/17/79 130-295 #31630
/@/LCI .50/                              FJ  F00 01/17/79 131-295 #31630
/@/PLM,12 TSTACK/                        FJ  F00 01/17/79 132-295 #31630
/@/B WRTD+.9C/                           FJ  F00 01/17/79 133-295 #31630
/@/PLW,4 TSTACK/                         FJ  F00 01/17/79 134-295 #31630
/@/B WRTD+.9D/                           FJ  F00 01/17/79 135-295 #31630
#                                        FJ  F00 01/17/79 136-295 #31630
/WRTD+.212/B @(LI,1 3)/                  FJ  F00 01/17/79 137-295 #31630
/@/LI,1 3/                               FJ  F00 01/17/79 138-295 #31630
/@/LI,12 0/                              FJ  F00 01/17/79 139-295 #31630
/@/B WRTD+.213/                          FJ  F00 01/17/79 140-295 #31630
/WRTD+.128/LB,0 .C,1(LI,4 0)/            FJ  F00 01/17/79 141-295 #31630
/. 1/STB,0 *.E,3/                        FJ  F00 01/17/79 142-295 #31630
/. 1/CI,1 3/                             FJ  F00 01/17/79 143-295 #31630
/. 1/CI,3 132/                           FJ  F00 01/17/79 145-295 #31630
/. 1/BGE WRTD+.131/                      FJ  F00 01/17/79 146-295 #31630
/. 1/AI,1 1/                             FJ  F00 01/17/79 147-295 #31630
/. 1/AI,3 1/                             FJ  F00 01/17/79 148-295 #31630
/. 1/B .-8(BAL,11 ;Q/                    FJ  F00 01/17/79 149-295 #31630
/WRTD+.218/B @(AI,1 -1/                  FJ  F00 01/17/79 150-295 #31630
/@/BCR,3 WRTD+.21A/                      FJ  F00 01/17/79 151-295 #31630
/@/AI,1 -1/                              FJ  F00 01/17/79 152-295 #31630
/@/B WRTD+.219/                          FJ  F00 01/17/79 153-295 #31630
#LINES0-1                                FJ  F00 01/17/79 154-295 #31630
MULOV/OPNLD+.31E/B @(STS,12 .10,1)/      FJ  F00 01/17/79 155-295 #31630
/@/STS,12 .10,1/                         FJ  F00 01/17/79 156-295 #31630
/@/LW,13 OPNLD+.593/                     FJ  F00 01/17/79 157-295 #31630
/@/SLS,12 16/                            FJ  F00 01/17/79 158-295 #31630
/@/CW,12 13/                             FJ  F00 01/17/79 159-295 #31630
/@/BANZ @+.05/                           FJ  F00 01/17/79 160-295 #31630
/@/SLS,12 8/                             FJ  F00 01/17/79 161-295 #31630
/@/CW,12 13/                             FJ  F00 01/17/79 162-295 #31630
/@/BANZ @+.02/                           FJ  F00 01/17/79 163-295 #31630
/@/LW,12 OPNLD+.58D/                     FJ  F00 01/17/79 164-295 #31630
/@/STS,12 .18,1/                         FJ  F00 01/17/79 165-295 #31630
/@/B OPNLD+.31F/                         FJ  F00 01/17/79 166-295 #31630
MULOV/OPNLD+.44E/BLE @(BLE OPNLD+.451)/  FJ  F00 01/17/79 167-295 #31630
/@/CI,1 0/                               FJ  F00 01/17/79 168-295 #31630
/@/BNEZ OPNLD+.451/                      FJ  F00 01/17/79 169-295 #31630
/@/LI,1 .10/                             FJ  F00 01/17/79 170-295 #31630
/@/CW,1 COMBAT/                          FJ  F00 01/17/79 171-295 #31630
/@/BAZ @+.12/                            FJ  F00 01/17/79 172-295 #31630
/@/LW,1 OPNLD+.58F/                      FJ  F00 01/17/79 173-295 #31630
/@/CW,1 .F,3/                            FJ  F00 01/17/79 174-295 #31630
/@/BAZ @+.04/                            FJ  F00 01/17/79 175-295 #31630
/@/LI,1 .100/                            FJ  F00 01/17/79 176-295 #31630
/@/CW,1 COMBAT/                          FJ  F00 01/17/79 177-295 #31630
/@/BAZ @+.0C/                            FJ  F00 01/17/79 178-295 #31630
/@/LI,1 S:ZLINE-S:FORMS/                 FJ  F00 01/17/79 179-295 #31630
/@/LW,0 .19,3/                           FJ  F00 01/17/79 180-295 #31630
/@/CW,0 S:FORMS-1,1/                     FJ  F00 01/17/79 181-295 #31630
/@/BE @+2/                               FJ  F00 01/17/79 182-295 #31630
/@/BDR,1 @-2/                            FJ  F00 01/17/79 183-295 #31630
/@/CI,1 S:ZLINE-S:FORMS/                 FJ  F00 01/17/79 184-295 #31630
/@/BE @+.05/                             FJ  F00 01/17/79 185-295 #31630
/@/CI,1 0/                               FJ  F00 01/17/79 186-295 #31630
/@/BE @+.03/                             FJ  F00 01/17/79 187-295 #31630
/@/LB,1 S:ZLINE,1/                       FJ  F00 01/17/79 188-295 #31630
/@/B OPNLD+.451/                         FJ  F00 01/17/79 189-295 #31630
/@/LW,1 OPNLD+.58F/                      FJ  F00 01/17/79 190-295 #31630
/@/CW,1 .F,3/                            FJ  F00 01/17/79 191-295 #31630
/@/BAZ OPNLD+.44F/                       FJ  F00 01/17/79 192-295 #31630
/@/LW,1 .18,3/                           FJ  F00 01/17/79 193-295 #31630
/@/SLS,1 -24/                            FJ  F00 01/17/79 194-295 #31630
MULOV/OPNLD+.312/BAL,2 @(BAL,2 OPNLD+.3A7)/  F00 01/17/79 196-295 #31630
/@/LW,12 COMBAT/                         FJ  F00 01/17/79 197-295 #31630
/@/CI,12 .10/                            FJ  F00 01/17/79 198-295 #31630
/@/BAZ OPNLD+.3A7/                       FJ  F00 01/17/79 199-295 #31630
/@/LW,12 0,7/                            FJ  F00 01/17/79 200-295 #31630
/@/CW,12 MASKS-.2B/                      FJ  F00 01/17/79 201-295 #31630
/@/BAZ OPNLD+.3A7/                       FJ  F00 01/17/79 202-295 #31630
/@/INT,13 12/                            FJ  F00 01/17/79 203-295 #31630
/@/BCS,1 @+4/                            FJ  F00 01/17/79 204-295 #31630
/@/AI,0 0/                               FJ  F00 01/17/79 205-295 #31630
/@/BGZ OPNLD+.3A7/                       FJ  F00 01/17/79 206-295 #31630
/@/B @+.0E/                              FJ  F00 01/17/79 207-295 #31630
/@/LI,4 2/                               FJ  F00 01/17/79 208-295 #31630
/@/INT,13 .C/                            FJ  F00 01/17/79 209-295 #31630
/@/BCR,4 @+2/                            FJ  F00 01/17/79 210-295 #31630
/@/AI,4 1/                               FJ  F00 01/17/79 211-295 #31630
/@/INT,13 .C/                            FJ  F00 01/17/79 212-295 #31630
/@/BCR,2 @+.05/                          FJ  F00 01/17/79 213-295 #31630
/@/LI,13 .100/                           FJ  F00 01/17/79 214-295 #31630
/@/CW,13 COMBAT/                         FJ  F00 01/17/79 215-295 #31630
/@/BAZ OPNLD+.3A7/                       FJ  F00 01/17/79 216-295 #31630
/@/AI,4 1/                               FJ  F00 01/17/79 217-295 #31630
/@/LW,4 *7,4/                            FJ  F00 01/17/79 218-295 #31630
/@/CI,4 1/                               FJ  F00 01/17/79 219-295 #31630
/@/BAZ OPNLD+.3A7/                       FJ  F00 01/17/79 220-295 #31630
/@/LI,4 .100/                            FJ  F00 01/17/79 221-295 #31630
/@/CW,4 COMBAT/                          FJ  F00 01/17/79 222-295 #31630
/@/BANZ @+.04/                           FJ  F00 01/17/79 223-295 #31630
/@/LW,4 OPNLD+.58F/                      FJ  F00 01/17/79 224-295 #31630
/@/CW,4 .F,1/                            FJ  F00 01/17/79 225-295 #31630
/@/BANZ OPNLD+.3A7/                      FJ  F00 01/17/79 226-295 #31630
/@/LI,4 11/                              FJ  F00 01/17/79 227-295 #31630
/@/LI,13 1/                              FJ  F00 01/17/79 228-295 #31630
/@/SLS,12 1/                             FJ  F00 01/17/79 229-295 #31630
/@/BCR,8 @+2/                            FJ  F00 01/17/79 230-295 #31630
/@/AI,13 1/                              FJ  F00 01/17/79 231-295 #31630
/@/BDR,4 @-3/                            FJ  F00 01/17/79 232-295 #31630
/@/LW,4 13/                              FJ  F00 01/17/79 233-295 #31630
/@/LW,12 *7,4/                           FJ  F00 01/17/79 234-295 #31630
/@/LI,4 S:ZLINE-S:FORMS/                 FJ  F00 01/17/79 235-295 #31630
/@/CW,12 S:FORMS-1,4/                    FJ  F00 01/17/79 236-295 #31630
/@/BE OPNLD+.3A7/                        FJ  F00 01/17/79 237-295 #31630
/@/BDR,4 @-2/                            FJ  F00 01/17/79 238-295 #31630
/@/LW,12 COMBAT/                         FJ  F00 01/17/79 239-295 #31630
/@/CI,12 .40/                            FJ  F00 01/17/79 240-295 #31630
/@/BAZ OPNLD+.3A7/                       FJ  F00 01/17/79 241-295 #31630
/@/CI,12 .20/                            FJ  F00 01/17/79 242-295 #31630
/@/BANZ @+4/                             FJ  F00 01/17/79 243-295 #31630
/@/LB,12 JIT+.43/                        FJ  F00 01/17/79 244-295 #31630
/@/CI,12 .C0/                            FJ  F00 01/17/79 245-295 #31630
/@/LW,12 0,7/                            FJ  F00 01/17/79 247-295 #31630
/@/CW,12 OPNLD+.293/                     FJ  F00 01/17/79 248-295 #31630
/@/BNE @+.06/                            FJ  F00 01/17/79 249-295 #31630
/@/LW,12 .1F,1/                          FJ  F00 01/17/79 250-295 #31630
/@/CI,12 .4/                             FJ  F00 01/17/79 251-295 #31630
/@/BAZ @+.03/                            FJ  F00 01/17/79 252-295 #31630
/@/AND,12 MASKS-.1D/                     FJ  F00 01/17/79 253-295 #31630
/@/STW,12 .1F,1/                         FJ  F00 01/17/79 254-295 #31630
/@/LI,8 .B704/                           FJ  F00 01/17/79 255-295 #31630
/@/B OPNLD+.28C/                         FJ  F00 01/17/79 256-295 #31630
#                                        FJ  F00 01/17/79 257-295 #31630
< ***** REPLACEMENT PATCH FOR THE ONE DATED 9/20/78 WHICH MUST BE #31630
<       REMOVED. THE SIZE OF THE PATCH MAY BE MISLEADING  ******  #31630
< $$$$$ READ FILE 31630INFO ON THE SST FOR FULL DETAIL.  $$$$$$   #31630
< ##### AS PATCH IS DEFAULT IMPLEMENTED, IT ONLY FIXES A  ######  #31630
< ##### A SLIGHT BUG IN PAGE NUMBER LOGIC. IT ALSO FIXES  #####   #31630
< ##### A MISTAKE IN PAGE ACCOUNTING IN PREVIOUS VERSIONS #####   #31630
< %%%%% 257 CARDS IN MULOV WHICH ALSO PATCHES ROOT        %%%%%%  #31630
< %%%%% 027 CARDS IN LDEV PROCESSOR. SIZE OF PATCH VARIES %%%%%%  #31630
< %%%%% 011 CARDS IN RBBAT (REQUIRES FULL BOOT TO ADD     %%%%%%  #31630
< %%%%% OR REMOVE EFFECT OF FORM MESSAGE CHANGE)          %%%%%%  #31630
#LINES0                                  FJ  F00 01/17/79 258-295 #31630
:GENMD,LDEV SECT4+41,900000FF(900001FF). FJ  F00 01/17/79 259-295 #31630
,PATCH+00,21100800.                      FJ  F00 01/17/79 260-295 #31630
,PATCH+01,69400003+PATCH.                FJ  F00 01/17/79 261-295 #31630
,PATCH+02,358001A3+SECT1.                FJ  F00 01/17/79 262-295 #31630
,PATCH+03,468001A3+SECT1.                FJ  F00 01/17/79 263-295 #31630
,PATCH+04,25800278.                      FJ  F00 01/17/79 264-295 #31630
,PATCH+05,498001A3+SECT1.                FJ  F00 01/17/79 265-295 #31630
,PATCH+06,25800208.                      FJ  F00 01/17/79 266-295 #31630
,PATCH+07,468001A3+SECT1.                FJ  F00 01/17/79 267-295 #31630
,PATCH+08,680001EA+SECT4.                FJ  F00 01/17/79 268-295 #31630
,SECT4+1E6,72880102+SECT1.                   F00 01/17/79 269-295 #31630
,SECT4+1E7,5210019E+SECT1.               FJ  F00 01/17/79 270-295 #31630
,SECT4+1E8,68000000+PATCH.               FJ  F00 01/17/79 271-295 #31630
,SECT4+1EA,21100001.                     FJ  F00 01/17/79 272-295 #31630
,SECT4+1EB,694001EE+SECT4.               FJ  F00 01/17/79 273-295 #31630
#ELSE                                    FJ  F00 01/17/79 274-295 #31630
:GENMD,LDEV SECT4+41,900000FF(900001FF). FJ  F00 01/17/79 275-295 #31630
,PATCH+00,21100800.                      FJ  F00 01/17/79 276-295 #31630
,PATCH+01,694001EA+SECT4.                FJ  F00 01/17/79 277-295 #31630
,PATCH+02,680001E8+SECT4.                FJ  F00 01/17/79 278-295 #31630
,SECT4+1E6,5210019E+SECT1.               FJ  F00 01/17/79 279-295 #31630
,SECT4+1E7,68000000+PATCH.               FJ  F00 01/17/79 280-295 #31630
,SECT4+1E8,72880102+SECT1.               FJ  F00 01/17/79 281-295 #31630
,SECT4+1EA,21100001.                     FJ  F00 01/17/79 282-295 #31630
,SECT4+1EB,694001EE+SECT1.               FJ  F00 01/17/79 283-295 #31630
#                                        FJ  F00 01/17/79 284-295 #31630
< ***** REPLACEMENT PATCH FOR THE ONE DATED 9/20/78 WHICH MUST BE #31630
<       REMOVED. THE SIZE OF THE PATCH MAY BE MISLEADING  ******  #31630
< ##### AS PATCH IS DEFAULT IMPLEMENTED, IT ONLY FIXES A  ######  #31630
< ##### A SLIGHT BUG IN PAGE NUMBER LOGIC. IT ALSO FIXES  #####   #31630
< ##### A MISTAKE IN PAGE ACCOUNTING IN PREVIOUS VERSIONS #####   #31630
< %%%%% 257 CARDS IN MULOV WHICH ALSO PATCHES ROOT        %%%%%%  #31630
< %%%%% 027 CARDS IN LDEV PROCESSOR. SIZE OF PATCH VARIES %%%%%%  #31630
< %%%%% 011 CARDS IN RBBAT (REQUIRES FULL BOOT TO ADD     %%%%%%  #31630
< %%%%% OR REMOVE EFFECT OF FORM MESSAGE CHANGE)          %%%%%%  #31630
#LINES0                                  FJ  F00 01/17/79 285-295 #31630
:GENMD,RBBAT RBG+276,680000E4+RBBP(6800030F+RBG).01/17/79 286-295 #31630
,RBBP+E4,693000E6+RBBP.                  FJ  F00 01/17/79 287-295 #31630
,RBBP+E5,32B000E8+RBBP.                  FJ  F00 01/17/79 288-295 #31630
,RBBP+E6,35B001C1+SDAA.                  FJ  F00 01/17/79 289-295 #31630
,RBBP+E7,6800030F+RBG.                   FJ  F00 01/17/79 290-295 #31630
,RBBP+E8,FFFFFFFF.                       FJ  F00 01/17/79 291-295 #31630
,RBG+12A3,175CE200.                      FJ  F00 01/17/79 292-295 #31630
,SDAA+1BC,17E7E7E7.                      FJ  F00 01/17/79 293-295 #31630
,SDAA+1BE,40D5C5C5,C4E240C6,D6D9D440,40404040.   01/17/79 294-295 #31630
#                                        FJ  F00 01/17/79 295-295 #31630
02/21/79
< CORRECT SC-0A, SC-0B WHEN SSW4 SET OR DOWTCK SET ON PACK SWAPPER#30301
<< SYSTEM.                                                        #30301
#DPSIO                                   KDR F00 01/19/79 001-009 #30301
UMOV/DPSIO+.276/B @(LI,14 .1E/           KDR F00 01/19/79 002-009 #30301
/@/AI,6 -2/                              KDR F00 01/19/79 003-009 #30301
/@/LI,14 .1E/                            KDR F00 01/19/79 004-009 #30301
UMOV/DPSIO+.279/NOP(AI,6 -2/             KDR F00 01/19/79 006-009 #30301
UMOV/DPSIO+.28F/BE DPSIO+.295(BE DPSIO+.292/ F00 01/19/79 007-009 #30301
UMOV/DPSIO+.298/B DPSIO+.292(XPSD,10 ;Q/ KDR F00 01/19/79 008-009 #30301
#                                        KDR F00 01/19/79 009-009 #30301
02/21/79
<THIS PATCH ALLOWS THE 'DELETE FILES...' MESSAGE TO BE ASKED WHEN #32095
<RESTORING AN INCREMENTAL TAPE WITH A NORMAL FILL.                #32095
,FILL+13F,68300141+FILL(69300141+FILL).  LLF F00 01/05/79 001-001 #32095
02/211/79
<THIS PATCH PREVENTS FILL FROM WRITING THE F:BREC FILE BEFORE HE  #32105
<READS IT; THE RESULT OF THE ERROR WAS TO CLOBBER PREVIOUSLY SET  #32105
<VALUES FOR SERIAL NUMBERS AND OTHER FILL DEFAULTS.               #32105
,BACKUP+D2,68000006+PATCH(33000000+DEBUG).   F00 01/05/79 001-011 #32105
,PATCH+06,04100009+PATCH.                LLF F00 01/05/79 002-011 #32105
,PATCH+07,33000000+DEBUG.                LLF F00 01/05/79 003-011 #32105
,PATCH+08,680000D3+BACKUP.               LLF F00 01/05/79 004-011 #32105
,PATCH+09,10000000+F:BREC.               LLF F00 01/05/79 005-011 #32105
,PATCH+0A,F8000000.                      LLF F00 01/05/79 006-011 #32105
,PATCH+0B,0+BSR1.                        LLF F00 01/05/79 007-011 #32105
,PATCH+0C,0+BSR1.                        LLF F00 01/05/79 008-011 #32105
,PATCH+0D,0+SAVEBUF.                     LLF F00 01/05/79 009-011 #32105
,PATCH+0E,58.                            LLF F00 01/05/79 010-011 #32105
,PATCH+0F,0+SAVKEY.                      LLF F00 01/05/79 011-011 #32105
02/21/79
< MAKE '5B10' IST RECORD FOR *G FILE.                             #31864
EVL,MCEV+508,680000FD+PATCH(6B408C00).   PRY F00 10/11/78 001-007 #31864
EVL,MCEV+50D,32B007AC+MCEV(325007AC+MCEV).   F00 10/11/78 002-007 #31864
EVL,MCEV+517,B1B00007(B1500007).         PRY F00 10/11/78 004-007 #31864
LDR,PATCH+FD,6B508C00.                   PRY F00 10/11/78 005-007 #31864
LDR,PATCH+FE,32400005.                   PRY F00 10/11/78 006-007 #31864
LDR,PATCH+FF,68000509+MCEV.              PRY F00 10/11/78 007-007 #31864
02/21/79
< FORCE WRITE TO TPFILES TO OCCUR BEFORE
< PROCEEDING SO LAST JOURNAL SN USED WILL
< ALWAYS BE CORRECT.
<
,DATA+A71,68000000+PATCH(0410012E+DATA).AJB F00 12/19/78 001-006 #32000
,PATCH,0410012E+DATA.                   AJB F00 12/19/78 002-006 #32000
,PATCH+1,04100003+PATCH.                AJB F00 12/19/78 003-006 #32000
,PATCH+2,68000A72+DATA.                 AJB F00 12/19/78 004-006 #32000
,PATCH+3,12000000+M:EI.                 AJB F00 12/19/78 005-006 #32000
,PATCH+4,00000000.                      AJB F00 12/19/78 006-006 #32000
02/21/79
< THIS PATCH FIXES SEVERAL ERRORS IN
< JOURNAL WRITE ERROR HANDLING WHICH
< CAUSE GARBAGE TO BE WRITTEN TO THE
< FRONT OF THE NEXT JOURNAL VOLUME.
<
,DATA+B9F,20D001F9(20D001FB).           AJB F00 01/04/78 001-014 #32002
,DATA-195,30000030(30000020).           AJB F00 01/04/78 002-014 #32002
,DATA-193,0000081C(00000814).           AJB F00 01/04/78 003-014 #32002
,DATA+BA1,327C0004(327C000D).           AJB F00 01/04/78 004-014 #32002
,DATA+BA2,2570006D(2570007E).           AJB F00 01/04/78 005-014 #32002
,DATA+BA4,20E00207(20E00205).           AJB F00 01/04/78 006-014 #32002
,DATA-191,30000010(30000000).           AJB F00 01/04/78 007-014 #32002
,DATA-18D,30000030(30000020).           AJB F00 01/04/78 008-014 #32002
,DATA-18B,0000081C(00000814).           AJB F00 01/04/78 009-014 #32002
,DATA+BB6,68000005+PATCH(3270000D+M:EO).AJB F00 01/04/78 010-014 #32002
,PATCH+6,2570006F.                      AJB F00 01/04/78 012-014 #32002
,PATCH+7,68000BB7+DATA.                 AJB F00 01/04/78 013-014 #32002
,DATA-189,30000010(30000000).           AJB F00 01/04/78 014-014 #32002
02/21/79
< FIX INCORRECT BUFFER OVERFLOW CHECK.                            #31910
,VTOC+EF9,2140C800(3140C800).            PRY F00 10/31/78 001-001 #31910
************************ SST 2-79 *************************
*************************
02/06/79
<MAKE THE LOADER PUT OUT AN EXPRESSION STACK RECORD WHEN THE REL  #31654
<OPTION IS SPECIFIED.                                             #31654
WRT,MCWT+7B,68000040+PATCH(694000BC+MCWT).   F00 12/11/78 001-007 #31654
LDR,PATCH+40,694000BC+MCWT.              DGH F00 12/11/78 002-007 #31654
LDR,PATCH+41,21F00100.                   DGH F00 12/11/78 003-007 #31654
LDR,PATCH+42,6940007C+MCWT.              DGH F00 12/11/78 004-007 #31654
LDR,PATCH+43,6800007F+MCWT.              DGH F00 12/11/78 005-007 #31654
EVL,MCEV+5F2,25900277(2590027B).         DGH F00 12/11/78 006-007 #31654
EVL,MCEV+5F3,48900000+Y8(49900000+Y4).   DGH F00 12/11/78 007-007 #31654
*************************
01/29/79
#L6R
<ARM AND ENABLE BOTH THE INPUT AND OUTPUT INTERRUPTS.  THIS PATCH #31666
<IS NEEDED ON A FECP ONLY SYSTEM                                  #31666
,L6G+65,6D501200+COA:IG(6D501400+COA:IG).DGH F00 01/24/79 001-001 #31666
#
01/29/79
<                                                                 #31830
<    STEP should catch (and abort) fetches of overlaid load       #31830
<    modules which have overlays extending past J:EUP.            #31830
<                                                                 #31830
<    This patch replaces a 6-card patch with the same SIDR        #31830
<    number - this version will catch the problems at fetch       #31830
<    time rather than at SEGLD time, and will give the standard   #31830
<    "A638 Program biased incorrectly or too big for user area"   #31830
<    message rather than the kludged-up "B109" error that the     #31830
<    old version thought up.                                      #31830
<                                                                 #31830
#HBUF=.9000                              DCP F00 01/29/79 001-013 #31830
#J:EUP=.8D13                             DCP F00 01/29/79 002-013 #31830
STEPOVR/STPNR+.57E/BAL,11 @ (BAL,11 STPNR+.97A/  01/29/79 003-013 #31830
/@/LI,1 .FFFF/                           DCP F00 01/29/79 004-013 #31830
/@/AND,1 HBUF+4/                         DCP F00 01/29/79 005-013 #31830
/@/AH,1 HBUF+4/                          DCP F00 01/29/79 006-013 #31830
/@/SLS,1 -8/                             DCP F00 01/29/79 007-013 #31830
/@/AI,1 -1/                              DCP F00 01/29/79 008-013 #31830
/@/CW,1 J:EUP/                           DCP F00 01/29/79 009-013 #31830
/@/BLE STPNR+.97A/                       DCP F00 01/29/79 010-013 #31830
/@/LI,10 .38/                            DCP F00 01/29/79 011-013 #31830
/@/B STPNR+.AAC/                         DCP F00 01/29/79 012-013 #31830
#HBUF;KJ:EUP;K1                          DCP F00 01/29/79 013-013 #31830
**************************
1/16/79
< FIX 75-02 ERRORS ON SHARED FILES                                #31655
/RDF+.5D2/CW,12 3,1(CS,12 3,1/           JFJ F00 11/28/78 001-004 #31655
/IORT+.66/STW,12 -2,2(STS,12 -2,2/       JFJ F00 11/28/78 002-004 #31655
/WRTF+.400/LW,5 LITERALS+.76(LI,5 .C/    JFJ F00 11/28/78 003-004 #31655
/WRTF+.401/AWM,5 3,2(MTB,1 *2,5/         JFJ F00 11/28/78 004-004 #31655
1/16/79
<   A timing window exists that can cause batch jobs to           #29132
<   vanish strangely if they are X'ed just after they start       #29132
<   to run (most recorded cases have been caused by a             #29132
<   "!BATCH fid" - "!CANCEL jobid" sequence).                     #29132
<                                                                 #29132
<   The problem is in two parts - both involve fixes in the       #29132
<   root. The problem is first triggered by the fact that a       #29132
<   newly-created user has a highly incomplete JIT - much         #29132
<   of the information has to be filled in by LOGON or            #29132
<   by CCI and the ADD/GETI module in the root. When SCHED        #29132
<   goes through the "dispatch user" code it checks to see if     #29132
<   the user has exceeded his (previously-computed) quantum       #29132
<   time. For a newly-created user, this quantum time will        #29132
<   be zero, but that's OK if the job wasn't aborted since        #29132
<   it hasn't used any time at all. However, if the job had       #29132
<   been aborted, SCHED would have gone through the T:OFF         #29132
<   code to record the abort event (it would be defered, though,  #29132
<   since CCI is "in control") and this path can use up enough    #29132
<   time to tick one TMS unit into the JIT. Since the job was     #29132
<   allocated 0 and used 1, it has "quantum ended" (so SCHED      #29132
<   figures) and the user is sent off to T:ACCTEX to compute      #29132
<   the allocation for his next quantum. T:ACCTEX sees that       #29132
<   this is a batch user, and uses the batch quantum time for     #29132
<   the partition that the job is running in. BUT - since         #29132
<   the JIT isn't complete yet, the partition number is zero!     #29132
<   Since the "quantum" on file for "partition" 0 is also         #29132
<   zero, the user's next quantum is extended not at all -        #29132
<   the next time SCHED tries to dispatch it.... lo and behold,   #29132
<   it's exceeded its quantum again (still). The job is now       #29132
<   thoroughly zombified, and will sit there spinning around      #29132
<   in the scheduler until the system crashes or is put           #29132
<   through an operator recovery. To fix this, T:ACCTEX is        #29132
<   changed to detect the "partition 0" condition and use         #29132
<   the default online quantum for the job's next time-slice -    #29132
<   this will give it time to pop up to CCI, jump down to         #29132
<   OPNLD to open the command stream, and two-step over into      #29132
<   ADD/GETI to fill in the blank portions of the JIT including   #29132
<   the real partition number.                                    #29132
<                                                                 #29132
#NSCPU                                   DCP F00 12/28/78 001-017 #29132
#VORPAL=SCHDSUB+.1D                      DCP F00 12/28/78 002-017 #29132
#ELSE                                    DCP F00 12/28/78 003-017 #29132
#VORPAL=SCHDSUB+.16                      DCP F00 12/28/78 004-017 #29132
#                                        DCP F00 12/28/78 005-017 #29132
/VORPAL/B @ (LB,5 0,5/                   DCP F00 12/28/78 006-017 #29132
/@/LB,5 0,5/                             DCP F00 12/28/78 007-017 #29132
/@/BEZ VORPAL+2/                         DCP F00 12/28/78 008-017 #29132
/@/B VORPAL+1/                           DCP F00 12/28/78 009-017 #29132
#VORPAL;K1                               DCP F00 12/28/78 010-017 #29132
<                                                                 #29132
<   initialization phases. A further loophole develops due        #29132
<   to the fact that the JIT gets partially re-initialized        #29132
<   by ADD/GETI when the first read to the C device is issued     #29132
<   by CCI. When SCHED saw that the "abort" bit was set in        #29132
<   UH:DL, it cleared the bit and set the run-status to X'10'     #29132
<   to tell CCI to abort things. However, the actual "abort       #29132
<   jobstep and go to command processor" stuff must not be        #29132
<   executed if CCI is in control, since aborting CCI would wreak #29132
<   havoc on the job. Normally, CCI would see the non-zero        #29132
<   run-status and abort the job before reading its next          #29132
<   command; in the case of abort before initialization, the      #29132
<   run-status gets cleared and the abort action gets lost.       #29132
<   This pre-initialization abort can be detected by the fact     #29132
<   that J:JIT=S:CUN - it's the only place that this can be       #29132
<   true. If this happens, we'll get the "abort" bit in           #29132
<   UH:DL again - the next time this job gets dispatched,         #29132
<   the "abort" run-status will be reported again, and            #29132
<   CCI will have finished initialization and be able to          #29132
<   shut down the user in a normal, graceful fashion.             #29132
<                                                                 #29132
/SCHED+.161/B @ (B SCHED+.95/            DCP F00 12/28/78 011-017 #29132
/@/CW,4 JIT/                             DCP F00 12/28/78 012-017 #29132
/@/BNE SCHED+.95/                        DCP F00 12/28/78 013-017 #29132
/@/LH,1 UH:DL,4/                         DCP F00 12/28/78 014-017 #29132
/@/OR,1 LITERALS+.13/                    DCP F00 12/28/78 015-017 #29132
/@/STH,1 UH:DL,4/                        DCP F00 12/28/78 016-017 #29132
/@/B SCHED+.95/                          DCP F00 12/28/78 017-017 #29132
1/16/79
<SOMETIMES FIX'S HGPR SHOULD NOT SAY 'NO SERIAL# SPECIFIED'.      #32070
FIX1/P .CAF/B PT 10(B FIXHGP .63E/       PAR F00 12/19/78 001-003 #32070
FIX1/PT 10/LW,11 D .1FF(/                PAR F00 12/19/78 002-003 #32070
FIX1/PT 11/B FIXHGP .63E(/               PAR F00 12/19/78 003-003 #32070
1/16/79
<    Security problem - users can re-write load module HEAD       #32098
<    record and get write access to their DCBs.                   #32098
STEPOVR/STPNR+.5D8/B @ (LB,7 .9000/      DCP F00 01/03/79 001-012 #32098
/@/LI,10 .31/                            DCP F00 01/03/79 002-012 #32098
/@/LW,6 .8D14/                           DCP F00 01/03/79 003-012 #32098
/@/CW,6 .8D15/                           DCP F00 01/03/79 004-012 #32098
/@/BG @+6/                               DCP F00 01/03/79 005-012 #32098
/@/LD,6 .8D1C/                           DCP F00 01/03/79 006-012 #32098
/@/CLM,6 .8D14/                          DCP F00 01/03/79 007-012 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 01/03/79 008-012 #32098
/@/CLM,7 .8D14/                          DCP F00 01/03/79 009-012 #32098
/@/BCR,9 STPNR+.AAC/                     DCP F00 01/03/79 010-012 #32098
/@/LB,7 .9000/                           DCP F00 01/03/79 011-012 #32098
/@/B STPNR+.5D9/                         DCP F00 01/03/79 012-012 #32098
1/16/79
<PASS2 NEGLECTS TO IGNORE 'COUPLE' ON :COC WHEN 'MINICOC' HAS BEEN
<SPECIFIED ON :MON CONTROL COMMAND
P2COC, +B3FF,6800B931(23F00017)             .LA 01 OF 05 12/06/78 F00 #32010
P2COC, +B931,33060047                       .LA 02 OF 05 12/06/78 #32010
P2COC, +B932,6830B936                       .LA 03 OF 05 12/06/78 #32010
P2COC, +B934,35B800F2                       .LA 05 OF 05 12/06/78 #32010
P2COC, +B935,6800B3FB                       .LA 06 OF 05 12/07/78 #32010
P2COC, +B936,23F00017                       .LA 04 OF 05 12/06/78 #32010
P2COC, +B937,6800B401                       .LA 05 OF 05 12/06/78 #32010
1/16/79
<PCL SHOULD BE ABLE TO L(A) WITH PLATEN WIDTH=0.                  #32061
,LIST+3D2,69200011+PATCH(692003D9+LIST). PAR F00 12/19/78 001-007 #32061
,PATCH+11,72100005.                      PAR F00 12/19/78 002-007 #32061
,PATCH+12,680003D9+LIST.                 PAR F00 12/19/78 003-007 #32061
,LIST+3D9,30100002(38E00002).            PAR F00 12/19/78 004-007 #32061
,LIST+3DA,3220000E(72200005).            PAR F00 12/19/78 005-007 #32061
,LIST+3DB,38200001(38E00002).            PAR F00 12/19/78 006-007 #32061
,LIST+3DC,682003D3+LIST(3220000E).       PAR F00 12/19/78 007-007 #32061
1/16/79
< Pigeon ought to bump its priority up when it first              #32094
< comes in as a ghost, so avoid system strangulation.             #32094
:GENMD PIGPP+2F,69400000+PATCH(69400038+PIGPP).  01/02/79 001-004 #32094
:GENMD PATCH+0,32100000+S:CUN.           DCP F00 01/02/79 002-004 #32094
:GENMD PATCH+1,73B20000+UB:PRIOB.        DCP F00 01/02/79 003-004 #32094
:GENMD PATCH+2,68000038+PIGPP.           DCP F00 01/02/79 004-004 #32094
************************ SST 1-79 *************************
1/2/79
< IN ORDER FOR A F00 FECP ONLY SYSTEM TO WORK PROPERLY A DCT INDEX#31658
<FOR THE OPLABEL 'ME' TO POINT  TO IS REQUIRED. THUS TO SYSGEN    #31658
<A F00 FECP ONLY SYSTEM, A DUMMY :DEVICE MEF00 CARD SHOULD        #31658
<BE PLACED INTO THE PASS2.   THE DEVICE ADDRESS SHOULD NOT        #31658
<CONFLICT WITH ANY OTHERS ON  THE SYSTEM.                         #31658
<FECP IN CALCULATING THE HIGHEST INPUT INTERRUPT LEVEL.           #31658
,COCG+B5,681000FB+COCG(68100102+COCG).   DGH F00 11/28/78 001-001 #31658
************************
12/12/78
<PMDE SHOULD WORK EVEN IF A LINK'ED-TO PROGRAM ABORTS.            #27621
DEBUG/PMD+.70/BGE @(BGE PMD+.5C/         PAR F00 11/14/78 001-005 #27621
/@/LB,1 *.8CEC/                          PAR F00 11/14/78 002-005 #27621
/@/AI,1 -4/                              PAR F00 11/14/78 003-005 #27621
/@/BE PMD+.74/                           PAR F00 11/14/78 004-005 #27621
/@/B PMD+.5C/                            PAR F00 11/14/78 005-005 #27621
12/12/78
< PREVENT INTERMITTENT BAD DISK BLOCKS WHEN FILLING SYMBIONT DATA #31649
< ON AN I/O BOUND SYSTEM, OR ON A HEAVY I/O USAGE SYSTEM.         #31649
MULOV/OPNLD+.194/BANZ @(BANZ OPNLD+.19A)/FJ  F00 11/25/78 001-008 #31649
/@/LCI 0/                                FJ  F00 11/25/78 002-008 #31649
/@/PSM,0 TSTACK/                         FJ  F00 11/25/78 003-008 #31649
/@/LW,6 3/                               FJ  F00 11/25/78 004-008 #31649
/@/BAL,11 IORT+.336/                     FJ  F00 11/25/78 005-008 #31649
/@/LCI 0/                                FJ  F00 11/25/78 006-008 #31649
/@/PLM,0 TSTACK/                         FJ  F00 11/25/78 007-008 #31649
/@/B OPNLD+.19A/                         FJ  F00 11/25/78 008-008 #31649
12/12/78
<    -----> Read file 24562INFO on the SST tape before <-----     #24562
<    ----->     attempting to install this patch!      <-----     #24562
<                                                                 #24562
<     This patch is a replacement for one with the same SIDR      #24562
<     number dated 9/27/78 - the old version must be removed.     #24562
<     occurring when the system begins to run out of symbiont     #24562
<     output file slots; it contains all of the code provided     #24562
<     by the previous version, as well as (optional) code         #24562
<     for SIDR 31906.                                             #24562
<                                                                 #24562
<     This is a three-section patch: 43 cards to the MULOV        #24562
<     overlay, 7 cards to RECOVER, and 103 cards to RBBAT.        #24562
<                                                                 #24562
<     If you are using either the GUARD=1 or GUARD=2 modes,       #24562
<     you should add the following two messages to ERRMSG         #24562
<     via ERRMWR:                                                 #24562
<                                                                 #24562
<        B71A Can't Superclose - no symbiont file slots left      #24562
<        B71C Can't LDEV - no symbiont file slots left            #24562
<                                                                 #24562
<     This section of the patch is to be installed in the MULOV   #24562
<     overlay. It absolutely *must* be placed *after* the         #24562
<     MULOV patch for SIDR 31911.                                 #24562
<                                                                 #24562
#GUARD                                   FJ  F00 11/18/78 001-153 #24562
#SUCLOG=@                                FJ  F00 11/18/78 002-153 #24562
/@/.D3D6C700/                            FJ  F00 11/18/78 003-153 #24562
/@/.D6D54040/                            FJ  F00 11/18/78 004-153 #24562
/@/.1A0000B7/                            FJ  F00 11/18/78 005-153 #24562
/@/.1C0000B7/                            FJ  F00 11/18/78 006-153 #24562
/@/LW,14 BL:OFS/                         FJ  F00 11/18/78 008-153 #24562
/@/CI,14 SNDDXSIZ+2/                     FJ  F00 11/18/78 009-153 #24562
/@/BL @+3/                               FJ  F00 11/18/78 010-153 #24562
/@/LI,14 0/                              FJ  F00 11/18/78 011-153 #24562
/@/B SUPCLS+.3E/                         FJ  F00 11/18/78 012-153 #24562
/@/LC JIT/                               FJ  F00 11/18/78 013-153 #24562
/@/BCR,8 @-3/                            FJ  F00 11/18/78 014-153 #24562
/@/LW,14 .8D01/                          FJ  F00 11/18/78 015-153 #24562
/@/SLS,14 8/                             FJ  F00 11/18/78 016-153 #24562
/@/CW,14 SUCLOG/                         FJ  F00 11/18/78 017-153 #24562
/@/BNE @+4/                              FJ  F00 11/18/78 018-153 #24562
/@/LW,14 .8D02/                          FJ  F00 11/18/78 019-153 #24562
/@/CW,14 SUCLOG+1/                       FJ  F00 11/18/78 020-153 #24562
/@/BE @-10/                              FJ  F00 11/18/78 021-153 #24562
/@/LW,14 SUCLOG+2/                       FJ  F00 11/18/78 022-153 #24562
/@/B STEP+.B/                            FJ  F00 11/18/78 023-153 #24562
MULOV/OPNLD+.1F1/B @(B OPNLD+.1F8)/      FJ  F00 11/18/78 024-153 #24562
/@/LW,13 BL:OFS/                         FJ  F00 11/18/78 025-153 #24562
/@/CI,13 SNDDXSIZ+2/                     FJ  F00 11/18/78 026-153 #24562
/@/BL @+2/                               FJ  F00 11/18/78 027-153 #24562
/@/B OPNLD+.1F8/                         FJ  F00 11/18/78 028-153 #24562
/@/LC JIT/                               FJ  F00 11/18/78 029-153 #24562
/@/BCR,8 $-2/                            FJ  F00 11/18/78 030-153 #24562
/@/LI,13 .70/                            FJ  F00 11/18/78 031-153 #24562
/@/CI,13 .40/                            FJ  F00 11/18/78 033-153 #24562
/@/BE @-6/                               FJ  F00 11/18/78 034-153 #24562
/@/LW,14 SUCLOG+3/                       FJ  F00 11/18/78 035-153 #24562
/@/B STEP+.B/                            FJ  F00 11/18/78 036-153 #24562
/COOP+.25/B @(LI,1 1)/                   FJ  F00 11/18/78 037-153 #24562
/@/LW,1 BL:OFS/                          FJ  F00 11/18/78 038-153 #24562
/@/CI,1 SNDDXSIZ+10/                     FJ  F00 11/18/78 039-153 #24562
/@/BL COOP+.43/                          FJ  F00 11/18/78 040-153 #24562
/@/LI,1 1/                               FJ  F00 11/18/78 041-153 #24562
/@/B COOP+.26/                           FJ  F00 11/18/78 042-153 #24562
#                                        FJ  F00 11/18/78 043-153 #24562
<    -----> Read file 24562INFO on the SST tape before <-----     #24562
<    ----->     attempting to install this patch!      <-----     #24562
<                                                                 #24562
<     This patch is a replacement for one with the same SIDR      #24562
<     number dated 9/27/78 - the old version must be removed.     #24562
<     This version implements an improved fix for problems        #24562
<     occurring when the system begins to run out of symbiont     #24562
<     output file slots; it contains all of the code provided     #24562
<     by the previous version, as well as (optional) code         #24562
<     for SIDR 31906.                                             #24562
<                                                                 #24562
<     This is a three-section patch: 43 cards to the MULOV        #24562
<     overlay, 7 cards to RECOVER, and 103 cards to RBBAT.        #24562
<                                                                 #24562
<     effect if (and only if) you are using the full-blown        #24562
<     GUARD=2 mode of operation (see the 24562INFO file           #24562
<     for an explanation of this). If you are going to            #24562
<     operate in this mode, this patch *must* be the very         #24562
<     last patch to RECOVER or dreadful things may happen if      #24562
<     your patch area is low on space. If your site uses          #24562
<     both tape and card patches and you have any card            #24562
<     patches to RECOVER, you should put this section of the      #24562
<     patch in your card deck after your last RECOVER patch       #24562
<     rather than (or as well as) on tape (it won't hurt          #24562
<     to have it in both places). If you're not planning          #24562
<     on using the GUARD=2 mode of operation, then you            #24562
<     don't have to worry about where in RECOVER this patch       #24562
<     goes.                                                       #24562
<                                                                 #24562
#GUARD-1                                 FJ  F00 11/18/78 044-153 #24562
/@/0/                                    FJ  F00 11/18/78 045-153 #24562
/@/0/                                    FJ  F00 11/18/78 046-153 #24562
/@/0/                                    FJ  F00 11/18/78 047-153 #24562
/@/0/                                    FJ  F00 11/18/78 048-153 #24562
/@/0/                                    FJ  F00 11/18/78 049-153 #24562
#                                        FJ  F00 11/18/78 050-153 #24562
<    -----> Read file 24562INFO on the SST tape before <-----     #24562
<    ----->     attempting to install this patch!      <-----     #24562
<     This patch is a replacement for one with the same SIDR      #24562
<     number dated 9/27/78 - the old version must be removed.     #24562
<     This version implements an improved fix for problems        #24562
<     occurring when the system begins to run out of symbiont     #24562
<     output file slots; it contains all of the code provided     #24562
<     by the previous version, as well as (optional) code         #24562
<     for SIDR 31906.                                             #24562
<                                                                 #24562
<     This is a three-section patch: 43 cards to the MULOV        #24562
<     overlay, 7 cards to RECOVER, and 103 cards to RBBAT.        #24562
<                                                                 #24562
,RBBP+05,09000000+TMPSTK.                FJ  F00 11/18/78 051-153 #24562
,RBBP+06,32000000+BL:OFS.                FJ  F00 11/18/78 052-153 #24562
,RBBP+07,2100000F+SNDDXSIZ.              FJ  F00 11/18/78 053-153 #24562
,RBBP+08,69100011+RBBP.                  FJ  F00 11/18/78 054-153 #24562
,RBBP+09,330001D9+SDAA.                  FJ  F00 11/18/78 055-153 #24562
,RBBP+0A,6810000D+RBBP.                  FJ  F00 11/18/78 056-153 #24562
,RBBP+0B,08000000+TMPSTK.                FJ  F00 11/18/78 057-153 #24562
,RBBP+0C,68040056+RBG.                   FJ  F00 11/18/78 058-153 #24562
,RBBP+0D,3200002B+RBBP.                  FJ  F00 11/18/78 059-153 #24562
,RBBP+0E,350001D9+SDAA.                  FJ  F00 11/18/78 060-153 #24562
,RBBP+0F,22000039+RBBP.                  FJ  F00 11/18/78 061-153 #24562
,RBBP+10,68000022+RBBP.                  FJ  F00 11/18/78 062-153 #24562
,RBBP+11,21000002+SNDDXSIZ.              FJ  F00 11/18/78 063-153 #24562
,RBBP+12,6820001B+RBBP.                  FJ  F00 11/18/78 064-153 #24562
,RBBP+13,2100000A+SNDDXSIZ.              FJ  F00 11/18/78 065-153 #24562
,RBBP+14,6920000B+RBBP.                  FJ  F00 11/18/78 066-153 #24562
,RBBP+15,330001D9+SDAA.                  FJ  F00 11/18/78 067-153 #24562
,RBBP+16,6920000B+RBBP.                  FJ  F00 11/18/78 068-153 #24562
,RBBP+17,22000001.                       FJ  F00 11/18/78 069-153 #24562
,RBBP+18,350001D9+SDAA.                  FJ  F00 11/18/78 070-153 #24562
,RBBP+19,2200002C+RBBP.                  FJ  F00 11/18/78 071-153 #24562
,RBBP+1A,68000022+RBBP.                  FJ  F00 11/18/78 072-153 #24562
,RBBP+1B,320001D9+SDAA.                  FJ  F00 11/18/78 073-153 #24562
,RBBP+1C,21000001.                       FJ  F00 11/18/78 074-153 #24562
,RBBP+1D,6930000B+RBBP.                  FJ  F00 11/18/78 075-153 #24562
,RBBP+1E,32000053+TABLES:.               FJ  F00 11/18/78 076-153 #24562
,RBBP+1F,20000001.                       FJ  F00 11/18/78 077-153 #24562
,RBBP+20,350001D9+SDAA.                  FJ  F00 11/18/78 078-153 #24562
,RBBP+21,22000033+RBBP.                  FJ  F00 11/18/78 079-153 #24562
,RBBP+22,022000F0.                       FJ  F00 11/18/78 080-153 #24562
,RBBP+23,0B100000+TMPSTK.                FJ  F00 11/18/78 081-153 #24562
,RBBP+24,32400000.                       FJ  F00 11/18/78 082-153 #24562
,RBBP+25,6A800BD5+RBG.                   FJ  F00 11/18/78 083-153 #24562
,RBBP+26,022000F0.                       FJ  F00 11/18/78 084-153 #24562
,RBBP+27,0A100000+TMPSTK.                FJ  F00 11/18/78 085-153 #24562
,RBBP+28,6800000B+RBBP.                  FJ  F00 11/18/78 086-153 #24562
,RBBP+29,0.                              FJ  F00 11/18/78 087-153 #24562
,RBBP+2A,0.                              FJ  F00 11/18/78 088-153 #24562
,RBBP+2B,80000000.                       FJ  F00 11/18/78 089-153 #24562
,RBBP+2D,E4E3D7E4.                       FJ  F00 11/18/78 091-153 #24562
,RBBP+2E,E340D8E4.                       FJ  F00 11/18/78 092-153 #24562
,RBBP+2F,C5E4C540.                       FJ  F00 11/18/78 093-153 #24562
,RBBP+30,C1D3D4D6.                       FJ  F00 11/18/78 094-153 #24562
,RBBP+31,E2E340C6.                       FJ  F00 11/18/78 095-153 #24562
,RBBP+32,E4D3D315.                       FJ  F00 11/18/78 096-153 #24562
,RBBP+33,171505D6.                       FJ  F00 11/18/78 097-153 #24562
,RBBP+34,E4E3D7E4.                       FJ  F00 11/18/78 098-153 #24562
,RBBP+35,E340D8E4.                       FJ  F00 11/18/78 099-153 #24562
,RBBP+36,C5E4C540.                       FJ  F00 11/18/78 100-153 #24562
,RBBP+37,C9E240C6.                       FJ  F00 11/18/78 101-153 #24562
,RBBP+38,E4D3D315.                       FJ  F00 11/18/78 102-153 #24562
,RBBP+39,1F1505D6.                       FJ  F00 11/18/78 103-153 #24562
,RBBP+3A,E4E3D7E4.                       FJ  F00 11/18/78 104-153 #24562
,RBBP+3B,E340D8E4.                       FJ  F00 11/18/78 105-153 #24562
,RBBP+3C,C5E4C540.                       FJ  F00 11/18/78 106-153 #24562
,RBBP+3D,E2D7C1C3.                       FJ  F00 11/18/78 107-153 #24562
,RBBP+3E,C540D9C5.                       FJ  F00 11/18/78 108-153 #24562
,RBBP+3F,E3E4D9D5.                       FJ  F00 11/18/78 109-153 #24562
,RBBP+40,C9D5C715.                       FJ  F00 11/18/78 110-153 #24562
,RBBP+41,32800053+TABLES:.               FJ  F00 11/18/78 111-153 #24562
,RBBP+42,318001D9+SDAA.                  FJ  F00 11/18/78 112-153 #24562
,RBBP+43,68200046+RBBP.                  FJ  F00 11/18/78 113-153 #24562
,RBBP+44,358001D9+SDAA.                  FJ  F00 11/18/78 114-153 #24562
,RBBP+45,6A800BD5+RBG.                   FJ  F00 11/18/78 115-153 #24562
,RBBP+46,68000DC4+RBG.                   FJ  F00 11/18/78 116-153 #24562
,SDAA+1D9,80000000.                      FJ  F00 11/18/78 117-153 #24562
,RBG+55,68000005+RBBP(68040056+RBG).     FJ  F00 11/18/78 118-153 #24562
,RBG+DC2,68000041+RBBP(22800DC4+RBG).    FJ  F00 11/18/78 119-153 #24562
#GUARD-1                                 FJ  F00 11/18/78 120-153 #24562
,RBBP+4A,31FFFFFD+MX:PPUT.               FJ  F00 11/18/78 121-153 #24562
,RBBP+4B,69100050+RBBP.                  FJ  F00 11/18/78 122-153 #24562
,RBBP+4C,22000000.                       FJ  F00 11/18/78 123-153 #24562
,RBBP+4D,46000000+S:BUAIS.               FJ  F00 11/18/78 124-153 #24562
,RBBP+4E,49000059+RBBP.                  FJ  F00 11/18/78 125-153 #24562
,RBBP+4F,34FFFFFD+MX:PPUT.               FJ  F00 11/18/78 126-153 #24562
,RBBP+50,31FFFFFC+MX:PPUT.               FJ  F00 11/18/78 127-153 #24562
,RBBP+51,69100056+RBBP.                  FJ  F00 11/18/78 128-153 #24562
,RBBP+52,22000000.                       FJ  F00 11/18/78 129-153 #24562
,RBBP+53,46000000+S:OUAIS.               FJ  F00 11/18/78 130-153 #24562
,RBBP+54,49000059+RBBP.                  FJ  F00 11/18/78 131-153 #24562
,RBBP+55,34FFFFFC+MX:PPUT.               FJ  F00 11/18/78 132-153 #24562
,RBBP+56,320001D9+SDAA.                  FJ  F00 11/18/78 133-153 #24562
,RBBP+57,6800001C+RBBP.                  FJ  F00 11/18/78 134-153 #24562
,RBBP+58,00000FFF.                       FJ  F00 11/18/78 135-153 #24562
,RBBP+59,80000000.                       FJ  F00 11/18/78 136-153 #24562
,RBBP+1B,6800004A+RBBP.                  FJ  F00 11/18/78 137-153 #24562
,RBBP+5A,31FFFFFD+MX:PPUT.               FJ  F00 11/18/78 138-153 #24562
,RBBP+5B,68300060+RBBP.                  FJ  F00 11/18/78 139-153 #24562
,RBBP+5C,4B000058+RBBP.                  FJ  F00 11/18/78 140-153 #24562
,RBBP+5E,22000000.                       FJ  F00 11/18/78 142-153 #24562
,RBBP+5F,34FFFFFD+MX:PPUT.               FJ  F00 11/18/78 143-153 #24562
,RBBP+60,31FFFFFC+MX:PPUT.               FJ  F00 11/18/78 144-153 #24562
,RBBP+61,68300066+RBBP.                  FJ  F00 11/18/78 145-153 #24562
,RBBP+62,4B000058+RBBP.                  FJ  F00 11/18/78 146-153 #24562
,RBBP+63,35000000+S:OUAIS.               FJ  F00 11/18/78 147-153 #24562
,RBBP+64,22000000.                       FJ  F00 11/18/78 148-153 #24562
,RBBP+65,34FFFFFC+MX:PPUT.               FJ  F00 11/18/78 149-153 #24562
,RBBP+66,22000039+RBBP.                  FJ  F00 11/18/78 150-153 #24562
,RBBP+67,68000022+RBBP.                  FJ  F00 11/18/78 151-153 #24562
,RBBP+0F,6800005A+RBBP.                  FJ  F00 11/18/78 152-153 #24562
#                                        FJ  F00 11/18/78 153-153 #24562
12/12/78
< FIX OPNLD TO USE THE PROPER DEVICE CODE PROVIDED BY LDEV        #31646
< FOR WORKSTATIONS. !LDEV XX,(DEV,YY),(WSN,Z),(ASAVE). ALSO       #31646
< DISCOVERED THAT THE INDIRECT BIT FOR THE DEV OPTION IS NOT      #31646
< CHECKED. A DOCUMENTATION CHANGE WILL BE REQUESTED TO REFLECT    #31646
< THAT INDIRECT IS NOT VALID ON THE IN/OUT OR THE DEV OPTION      #31646
< WORDS IN THE M:LDEV FPT.  IF THE BIT IS SET THE CAL WILL BE     #31646
< ERRORED WITH A B704 ERROR.                                      #31646
MULOV/OPNLD+.E1/B @(LW,13 *7,4)/         FJ  F00 11/21/78 001-032 #31646
/@/LW,13 *7,4/                           FJ  F00 11/21/78 002-032 #31646
/@/BGEZ OPNLD+.E2/                       FJ  F00 11/21/78 003-032 #31646
/@/B OPNLD+.D7/                          FJ  F00 11/21/78 004-032 #31646
MULOV/OPNLD+.157/B @(B OPNLD+.1BE)/      FJ  F00 11/21/78 005-032 #31646
/@/B OPNLD+.1BE/                         FJ  F00 11/21/78 007-032 #31646
MULOV/OPNLD+.15E/BLZ OPNLD+.D7(BEZ OPNLD+.161)/  11/21/78 008-032 #31646
MULOV/. 1/BEZ OPNLD+.161(LW,2 *7,4)/     FJ  F00 11/21/78 009-032 #31646
MULOV/. 1/B @(B OPNLD+.1CB/              FJ  F00 11/21/78 010-032 #31646
/@/LW,2 *7,4/                            FJ  F00 11/21/78 011-032 #31646
/@/BLZ OPNLD+.D7/                        FJ  F00 11/21/78 012-032 #31646
/@/OR,2 MASKS-.23/                       FJ  F00 11/21/78 013-032 #31646
/@/B OPNLD+.1CB/                         FJ  F00 11/21/78 014-032 #31646
MULOV/OPNLD+.211/LW,4 ;Q,3(LW,2 ;Q,3)/   FJ  F00 11/21/78 015-032 #31646
MULOV/. 2/STW,4 ;Q,3(STW,2 ;Q,3)/        FJ  F00 11/21/78 016-032 #31646
MULOV/. 1/LI,4 ;Q(LI,2 ;Q)/              FJ  F00 11/21/78 017-032 #31646
MULOV/. 2/MTH,0 *3,4(MTH,0 *3,2)/        FJ  F00 11/21/78 018-032 #31646
MULOV/OPNLD+.223/CW,2 MASKS-.23(LI,2 .FF)/   F00 11/21/78 019-032 #31646
MULOV/. 1/BAZ @(AND,2 1,3)/              FJ  F00 11/21/78 020-032 #31646
MULOV/. 1/B @+1(B OPNLD+.227)/           FJ  F00 11/21/78 021-032 #31646
/@/LW,2 1,3/                             FJ  F00 11/21/78 022-032 #31646
/@/AND,2 MASKS+8/                        FJ  F00 11/21/78 023-032 #31646
/@/B OPNLD+.227/                         FJ  F00 11/21/78 024-032 #31646
MULOV/OPNLD+.310/B @(LW,8 2)/            FJ  F00 11/21/78 025-032 #31646
/@/LI,8 .FF/                             FJ  F00 11/21/78 026-032 #31646
/@/AND,8 2/                              FJ  F00 11/21/78 027-032 #31646
/@/B OPNLD+.311/                         FJ  F00 11/21/78 028-032 #31646
MULOV/OPNLD+.2E5/B @(CI,2 5)/            FJ  F00 11/21/78 029-032 #31646
/@/AND,2 MASKS+.8/                       FJ  F00 11/21/78 030-032 #31646
/@/CI,2 5/                               FJ  F00 11/21/78 031-032 #31646
12/12/78
< CLEAN UP SOME DISCONNECT SEQUENCE PROBLEMS CAUSED BY MODEM SHUT #31647
< OFF JUST AS THE WRITE ORDER STARTS TO THE DSC.                  #31647
#HASPIO                                  FJ  F00 11/16/78 001-012 #31647
UMOV/BSCIO+.4F/B @(B BSCIO+.47)/         FJ  F00 11/16/78 002-012 #31647
/@/MTB,1 IOQ11,3/                        FJ  F00 11/16/78 003-012 #31647
/@/B BSCIO+.47/                          FJ  F00 11/16/78 004-012 #31647
#                                        FJ  F00 11/16/78 005-012 #31647
#2780IO                                  FJ  F00 11/16/78 006-012 #31647
UMOV/2780IO+.D/B @(CI,5 8)/              FJ  F00 11/16/78 007-012 #31647
/@/CI,5 .C/                              FJ  F00 11/16/78 008-012 #31647
/@/BE BSCIO+.44/                         FJ  F00 11/16/78 009-012 #31647
/@/CI,5 .8/                              FJ  F00 11/16/78 010-012 #31647
/@/B 2780IO+.E/                          FJ  F00 11/16/78 011-012 #31647
#                                        FJ  F00 11/16/78 012-012 #31647
12/12/78
< FIX OUTSYM TO PUT THE BAD ADDRESS AND THE STARTING ADDRESS      #31648
< IN THE RIGHT REGISTERS BEFORE CALLING ERRLOG FOR TYPE 1B ENTRY  #31648
UMOV/OUTSYM+.C9/LI,14 0(LW,14 8,1)/      FJ  F00 11/19/78 001-010 #31648
UMOV/. 1/XW,14 4,1/                      FJ  F00 11/19/78 002-010 #31648
UMOV/. 1/STB,11 .E/                      FJ  F00 11/19/78 003-010 #31648
UMOV/. 1/LI,3 .800/                      FJ  F00 11/19/78 004-010 #31648
UMOV/. 1/STS,3 1,1/                      FJ  F00 11/19/78 005-010 #31648
UMOV/. 1/LI,11 .1B04/                    FJ  F00 11/19/78 006-010 #31648
UMOV/. 1/LB,3 *.A/                       FJ  F00 11/19/78 007-010 #31648
UMOV/. 1/LB,12 SNDDX,3/                  FJ  F00 11/19/78 008-010 #31648
UMOV/. 1/LW,15 8,1(XW,15 4,1)/           FJ  F00 11/19/78 010-010 #31648
12/12/78
<SET DENSITY AT 1600BPI FOR ALL TAPE MOUNTS OF MPC TAPES.         #31640
<THIS PATCH REPLACES PATCH OF SAME SIDR NO. DATED 10/05/78.       #31640
UMOV/IOQ+.2B1/BE @(BE IOQ+.27C/          KRD F00 11/10/78 001-013 #31640
/@/EXU IOQ+.27C/                         KRD F00 11/10/78 002-013 #31640
/@/LI,2 .20/                             KRD F00 11/10/78 003-013 #31640
/@/WD,2 .1200/                           KRD F00 11/10/78 004-013 #31640
/@/LW,12 $+8/                            KRD F00 11/10/78 005-013 #31640
/@/OR,12 7/                              KRD F00 11/10/78 006-013 #31640
/@/LI,13 0/                              KRD F00 11/10/78 007-013 #31640
/@/LW,15 LITERALS+.23/                   KRD F00 11/10/78 008-013 #31640
/@/LI,0 0/                               KRD F00 11/10/78 009-013 #31640
/@/BAL,11 IOQM+.41/                      KRD F00 11/10/78 010-013 #31640
/@/NOP/                                  KRD F00 11/10/78 011-013 #31640
/@/B IOQ+.280/                           KRD F00 11/10/78 012-013 #31640
/@/.0C000000/                            KRD F00 11/10/78 013-013 #31640
12/12/78
<INOPERABLE STATUS-OPERATOR ATTENTION REQUIRED.                   #31897
#MPCDIO                                  KRD F00 11/10/78 001-003 #31897
UMOV/MPCDIO+.56/.00040404(.01040404/     KRD F00 11/10/78 002-003 #31897
#                                        KRD F00 11/10/78 003-003 #31897
12/12/78
<NO NEED TO HOLD CHANNEL FOR MPC DISK I/O.                        #31636
#MPCDIO                                  KRD F00 09/29/78 001-003 #31636
UMOV/MPCDIO+.16E/LI,5 0(LW,5 LITERALS+.21/   F00 09/29/78 002-003 #31636
#                                        KRD F00 09/29/78 003-003 #31636
<PUT NEW Q ENTRY AT BOTTOM OF Q NOT TOP WHEN THERE ARE NO ENTRIES #31896
<FOR THIS DEVICE AND PRIORITY IS LESS .                           #31896
UMOV/IOQ+.6F/BLE @(BLE IOQ+.64/          KRD F00 10/26/78 001-006 #31896
/@/BL IOQ+.64/                           KRD F00 10/26/78 002-006 #31896
/@/EXU $+1,2/                            KRD F00 10/26/78 003-006 #31896
/@/B IOQ+.70/                            KRD F00 10/26/78 004-006 #31896
/@/B IOQ+.64/                            KRD F00 10/26/78 005-006 #31896
/IORT+.3EB/LW,13 SSDAT+.18(LB,13 .4F/    KRD F00 10/26/78 006-006 #31896
12/12/78
<O'24' IS NOT A VALID READ RETRY CORRECTION CODE.                 #31960
#MPCTIO                                  KRD F00 11/10/78 001-012 #31960
UMOV/MPCTIO+.2FF/B @(AND,10 LITERALS+.46/KRD F00 11/10/78 002-012 #31960
/@/CI,10 3/                              KRD F00 11/10/78 003-012 #31960
/@/BLE MPCTIO+.300/                      KRD F00 11/10/78 004-012 #31960
/@/AI,10 1/                              KRD F00 11/10/78 005-012 #31960
/@/AND,10 LITERALS+.46/                  KRD F00 11/10/78 006-012 #31960
/@/CI,10 4/                              KRD F00 11/10/78 007-012 #31960
/@/BNE MPCTIO+.300/                      KRD F00 11/10/78 008-012 #31960
/@/AI,10 1/                              KRD F00 11/10/78 009-012 #31960
/@/AND,10 LITERALS+.46/                  KRD F00 11/10/78 010-012 #31960
/@/B MPCTIO+.300/                        KRD F00 11/10/78 011-012 #31960
#                                        KRD F00 11/10/78 012-012 #31960
12/12/78
<STOP HEADING FOR MPCDUMP IF NO MPC                               #31635
<REALIGN DISK DUMP DATA WITH HEADINGS                             #31635
#MPCDUMP
RECOVER/MPCDUMP+.29/ NOP ( BAL,15 MPCDUMP+.12A/  11/27/78 001-016 #31635
RECOVER/MPCDUMP+.3E/ B @ ( LI,3 0/       DAL F00 11/27/78 003-016 #31635
/@/ MTW,1 $+6/                           DAL F00 11/27/78 004-016 #31635
/@/ BNEZ $+3/                            DAL F00 11/27/78 005-016 #31635
/@/ BAL,15 MPCDUMP+.12A/                 DAL F00 11/27/78 006-016 #31635
/@/ BAL,15 MPCDUMP+.1A8/                 DAL F00 11/27/78 007-016 #31635
/@/ LI,3 0/                              DAL F00 11/27/78 008-016 #31635
/@/ B MPCDUMP+.3F/                       DAL F00 11/27/78 009-016 #31635
/@/ -1/                                  DAL F00 11/27/78 010-016 #31635
RECOVER/MPCDUMP+.59/ LI,11 RCVCTL-.700 / DAL F00 11/27/78 011-016 #31635
RECOVER/MPCDUMP+.107/ B @ ( BAL,15 MPCDUMP+.12A/ 11/27/78 012-016 #31635
/@/ MTW,1 $-1/                           DAL F00 11/27/78 013-016 #31635
/@/ BEZ $+2/                             DAL F00 11/27/78 014-016 #31635
/@/ BAL,15 MPCDUMP+.12A/                 DAL F00 11/27/78 015-016 #31635
/@/ B MPCDUMP+.108/                      DAL F00 11/27/78 016-016 #31635
12/12/78
<EDIT SHOULD WORK AS A GHOST JOB, TOO.                            #31622
,P+22F,69C00236+P(69800236+P).           PAR F00 11/21/78 001-019 #31622
,P+1526,69C0152B+P(6980152B+P).          PAR F00 11/21/78 002-019 #31622
,P+16A5,69C016A8+P(698016A8+P).          PAR F00 11/21/78 003-019 #31622
,PATCHP+9,B206000C(0).                   PAR F00 11/21/78 004-019 #31622
,PATCHP+A,31300006(0).                   PAR F00 11/21/78 005-019 #31622
,PATCHP+B,6910123C+P(0).                 PAR F00 11/21/78 006-019 #31622
,PATCHP+C,68001241+P(0).                 PAR F00 11/21/78 007-019 #31622
,P+123A,44400009+PATCHP(3240000C).       PAR F00 11/21/78 008-019 #31622
,P+123B,3060017A+D(30400003).            PAR F00 11/21/78 009-019 #31622
,P+1247,6830000A+PATCHP(68301241+P).     PAR F00 11/21/78 010-019 #31622
,P+1265,6800123B+P(6800123C+P).          PAR F00 11/21/78 012-019 #31622
,P+16A7,6800000D+PATCHP(680E0000).       PAR F00 11/21/78 013-019 #31622
,PATCHP+D,4100098+BPMPT1(0).             PAR F00 11/21/78 014-019 #31622
,PATCHP+E,680E0000(0).                   PAR F00 11/21/78 015-019 #31622
,P+1527,52000000+J:CCBUF(6B000000+J:CCBUF).  F00 11/21/78 016-019 #31622
,P+152B,4900001A+PATCHP(490017A1+P).     PAR F00 11/21/78 017-019 #31622
,PATCHP+1A,4040(0).                      PAR F00 11/21/78 018-019 #31622
,P+152D,210040C5(210000C5).              PAR F00 11/21/78 019-019 #31622
12/12/78
<PCL SHOULD PRODUCE DO OUTPUT ONLY WHEN NEEDED.                   #31885
,PCL+1FC,68000001+PATCH(30100007).       PAR F00 11/14/78 001-008 #31885
,PATCH+1,30100007.                       PAR F00 11/14/78 002-008 #31885
,PATCH+2,3300000A+BREAK.                 PAR F00 11/14/78 003-008 #31885
,PATCH+3,6830024D+PCL.                   PAR F00 11/14/78 004-008 #31885
,PATCH+4,32AE0052,20AFFDF4,21A00050.     PAR F00 11/14/78 005-008 #31885
,PATCH+7,691001FD+PCL,22A00050.          PAR F00 11/14/78 006-008 #31885
,PATCH+9,680001FD+PCL.                   PAR F00 11/14/78 007-008 #31885
,PCL+30E,8000000A(50).                   PAR F00 11/14/78 008-008 #31885
12/12/78
<PCL HEXDUMP SHOULD NOTICE WIDE TERMINALS.                        #31990
,RDWRT+597,6830000C+PATCH.               PAR F00 11/28/78 001-004 #31990
,PATCH+C,2212311A,72120000,2110007C.     PAR F00 11/28/78 002-004 #31990
,PATCH+F,69100599+RDWRT.                 PAR F00 11/28/78 003-004 #31990
,PATCH+10,68000598+RDWRT.                PAR F00 11/28/78 004-004 #31990
12/12/78
<PCL SHOULD ALLOW PADDING IN FIXED FORMAT ANSTAPES TOO.           #31645
,RDWRT+76,6830000A+PATCH(68300079+RDWRT).PAR F00 11/28/78 001-004 #31645
,PATCH+A,3210002D+PRNTBUF.               PAR F00 11/28/78 002-004 #31645
,PATCH+B,68000077+RDWRT.                 PAR F00 11/28/78 003-004 #31645
,RDWRT+2EC,312E0005+WRTFPT(31200000+BLKSIZE).F00 11/28/78 004-004 #31645
12/12/78
<PCL LIST LT SHOULDN'T CLOBBER ITS HEADING (DATE).                #31987
,BLDCB+C8,22100010(22100028).            PAR F00 11/28/78 001-001 #31987
12/12/78
< FIX BAD SHIFT INSTRUCTION WHEN CALCULATING PAGE ADDR OF WORD    #31942
< CONTAINING UB:PRIOB .                                           #31942
,RAP+4,2570007E(2570007F).               FJ  F00 11/16/78 001-001 #31942
12/12/78
12/12/78
< FIX IT SO THAT THE REMOTE IRBT OPERATOR DOES NOT HAVE TO DO     #31961
< ANYTHING TO GET A FILE BUILT FOR THE OC VIA THE                 #31961
< !LDEV XX,(DEV,OC),(WSN,N) !COPY !PRINT SEQUENCE WHICH GENERATES #31961
< A  FILE. PRIOR TO THIS PATCH THE OPERATOR WOULD ONLY GET IT     #31961
< AFTER ENTERING SOME TYPE OF COMMAND.                            #31961
#MXSTRM                                  FJ  F00 11/26/78 001-010 #31961
,RBBP+E9,22500000+LCLX.                  FJ  F00 11/26/78 002-010 #31961
,RBBP+EA,22F00002.                       FJ  F00 11/26/78 003-010 #31961
,RBBP+EB,51F60000+STH:FLG.               FJ  F00 11/26/78 004-010 #31961
,RBBP+EC,68400C58+RBG.                   FJ  F00 11/26/78 005-010 #31961
,RBBP+ED,73060000+SSIG.                  FJ  F00 11/26/78 006-010 #31961
,RBBP+EE,E9300008.                       FJ  F00 11/26/78 007-010 #31961
,RBBP+EF,68000C2C+RBG.                   FJ  F00 11/26/78 008-010 #31961
,RBG+C57,680000E9+RBBP(22500000+LCLX).   FJ  F00 11/26/78 009-010 #31961
#                                        FJ  F00 11/26/78 010-010 #31961
************************** SST 12-78 ************************
11/17/78
< OPEN DCB CONNECTED THRU IT TO A CARD PUNCH, THEN CLOSES THE DCB #31911
<  DOING THIS WILL PREVENT THE !EOD CARD NORMALLY PUNCHED BY      #31911
<  CLOSE BUT THAT IS WHAT WAS REQUESTED BY THE SEQUENCE.          #31911
<    TWO PART PATCH 5 CARDS IN ROOT 8 CARDS IN MULOV OVERLAY.     #31911
/WRTD+.1DF/B @(BAL,3 COOP+.218)/         FJ  F00 11/03/78 001-013 #31911
/@/BAL,3 COOP+.218/                      FJ  F00 11/03/78 002-013 #31911
/@/AI,12 0/                              FJ  F00 11/03/78 003-013 #31911
/@/BNEZ WRTD+.1E9/                       FJ  F00 11/03/78 004-013 #31911
/@/B WRTD+.1E0/                          FJ  F00 11/03/78 005-013 #31911
11/17/78
< MAKE MBS WORK CORRECTLY IF NEGATIVE OFFSET IN IA FIELD OF INSTR #31624
#S5SIM                                   JLJ F00 10/23/78 001-011 #31624
/S5SIM+.E3/B S5SIM+.385(.25200003/       JLJ F00 10/23/78 002-011 #31624
/S5SIM+.385/LW,8 5(0/                    JLJ F00 10/23/78 003-011 #31624
/S5SIM+.386/SW,8 3(0/                    JLJ F00 10/23/78 004-011 #31624
/S5SIM+.387/CI,8 .1FFFE(0/               JLJ F00 10/23/78 005-011 #31624
/S5SIM+.388/BAZ S5SIM+.38B(0/            JLJ F00 10/23/78 006-011 #31624
/S5SIM+.389/.25200003(0/                 JLJ F00 10/23/78 007-011 #31624
/S5SIM+.38A/B S5SIM+.E4(0/               JLJ F00 10/23/78 008-011 #31624
/S5SIM+.38B/.25500002(0/                 JLJ F00 10/23/78 009-011 #31624
/S5SIM+.38C/B S5SIM+.F5(0/               JLJ F00 10/23/78 010-011 #31624
#                                        JLJ F00 10/23/78 011-011 #31624
11/17/78
< REPLACEMENT PATCH FOR ONE DATED 9/26/78.                        #27264
< IMPROVE UTIMER ACCURACY BY CHECKING AFTER EACH MONITOR SERVICE. #27264
/SCHED+.12/BDR,0 @(BDR,0 ;Q/             KDR F00 10/23/78 001-012 #27264
/@/BEZ SCHED+.39B/                       KDR F00 10/23/78 003-012 #27264
/@/LH,15 UH:FLG,4/                       KDR F00 10/23/78 004-012 #27264
/@/CI,15 .C0/                            KDR F00 10/23/78 005-012 #27264
/@/BANZ SCHED+.39B/                      KDR F00 10/23/78 006-012 #27264
/@/LCW,13 .8C47/                         KDR F00 10/23/78 007-012 #27264
/@/AW,13 .8C0F/                          KDR F00 10/23/78 008-012 #27264
/@/AW,13 .8C07/                          KDR F00 10/23/78 009-012 #27264
/@/CW,13 .8C25/                          KDR F00 10/23/78 010-012 #27264
/@/BL SCHED+.39B/                        KDR F00 10/23/78 011-012 #27264
/@/B SCHED+.150/                         KDR F00 10/23/78 012-012 #27264
11/17/78
< REPLACEMENT PATCH FOR SIDR #31630 DATED 9/20/78.  IT SHOULD BE  #31630
< REMOVED.  THIS ONE EXTENDS THE " !LDEV XX,(LINES,0), " FEATURE  #31630
< TO REMOTE WORKSTATIONS ALSO.  THE BASIC FUNCTION OF THIS PATCH  #31630
< IS TO PROVIDE A MEANS OF PRINTING ACROSS THE CREASE IN LP PAPER #31630
< WHEN USING A VFU LOOP THAT WON'T AUTOMATICALLY GO TO TOF. IF    #31630
< USER USES VFC AND SET LINES PER PAGE TO 0 IT WILL WORK. A PAGE  #31630
< COUNT IS STILL MAINTAINED HOWEVER SO THE APPROPRIATE CHARGES    #31630
< CAN STILL BE MADE.                                              #31630
<                     37 CARDS IN THE ROOT AND 8 CARDS TO LDEV    #31630
/WRTD+.212/B @(LI,1 3)/                  FJ  F00 11/14/78 001-045 #31630
/@/LI,1 3/                               FJ  F00 11/14/78 002-045 #31630
/@/LI,12 0/                              FJ  F00 11/14/78 003-045 #31630
/@/B WRTD+.213/                          FJ  F00 11/14/78 004-045 #31630
/WRTD+.7A/B @(LI,14 .F1)/                FJ  F00 11/14/78 005-045 #31630
/@/BEZ WRTD+.7F/                         FJ  F00 11/14/78 007-045 #31630
/@/LI,14 .F1/                            FJ  F00 11/14/78 008-045 #31630
/@/B WRTD+.7B/                           FJ  F00 11/14/78 009-045 #31630
/WRTD+.95/B @(CW,0 15)/                  FJ  F00 11/14/78 010-045 #31630
/@/BEZ WRTD+.97/                         FJ  F00 11/14/78 011-045 #31630
/@/CW,0 15/                              FJ  F00 11/14/78 012-045 #31630
/@/BL @-6/                               FJ  F00 11/14/78 013-045 #31630
/@/B WRTD+.97/                           FJ  F00 11/14/78 014-045 #31630
/WRTD+.99/B @(AI,15 1)/                  FJ  F00 11/14/78 015-045 #31630
/@/AI,15 1/                              FJ  F00 11/14/78 016-045 #31630
/@/AI,0 0/                               FJ  F00 11/14/78 017-045 #31630
/@/BNEZ WRTD+.9A/                        FJ  F00 11/14/78 018-045 #31630
/@/CI,15 .1F/                            FJ  F00 11/14/78 019-045 #31630
/@/BANZ WRTD+.9D/                        FJ  F00 11/14/78 020-045 #31630
/@/AI,5 0/                               FJ  F00 11/14/78 021-045 #31630
/@/BEZ WRTD+.9C/                         FJ  F00 11/14/78 022-045 #31630
/@/MTW,1 .17,5/                          FJ  F00 11/14/78 023-045 #31630
/@/B WRTD+.9C/                           FJ  F00 11/14/78 024-045 #31630
/WRTD+.128/LB,0 .C,1(LI,4 0)/            FJ  F00 11/14/78 025-045 #31630
/. 1/STB,0 *.E,3/                        FJ  F00 11/14/78 026-045 #31630
/. 1/CI,1 3/                             FJ  F00 11/14/78 027-045 #31630
/. 1/BGE WRTD+.131/                      FJ  F00 11/14/78 028-045 #31630
/. 1/CI,3 132/                           FJ  F00 11/14/78 029-045 #31630
/. 1/BGE WRTD+.131/                      FJ  F00 11/14/78 030-045 #31630
/. 1/AI,1 1/                             FJ  F00 11/14/78 031-045 #31630
/. 1/B .-8(BAL,11 ;Q/                    FJ  F00 11/14/78 033-045 #31630
/WRTD+.218/B @(AI,1 -1/                  FJ  F00 11/14/78 034-045 #31630
/@/BCR,3 WRTD+.21A/                      FJ  F00 11/14/78 035-045 #31630
/@/AI,1 -1/                              FJ  F00 11/14/78 036-045 #31630
/@/B WRTD+.219/                          FJ  F00 11/14/78 037-045 #31630
< REPLACEMENT PATCH FOR SIDR #31630 DATED 9/20/78.  IT SHOULD BE  #31630
< REMOVED.  THIS ONE EXTENDS THE " !LDEV XX,(LINES,0), " FEATURE  #31630
< TO REMOTE WORKSTATIONS ALSO.  THE BASIC FUNCTION OF THIS PATCH  #31630
< IS TO PROVIDE A MEANS OF PRINTING ACROSS THE CREASE IN LP PAPER #31630
< WHEN USING A VFU LOOP THAT WON'T AUTOMATICALLY GO TO TOF. IF    #31630
< USER USES VFC AND SET LINES PER PAGE TO 0 IT WILL WORK. A PAGE  #31630
< COUNT IS STILL MAINTAINED HOWEVER SO THE APPROPRIATE CHARGES    #31630
< CAN STILL BE MADE.                                              #31630
<                     37 CARDS IN THE ROOT AND 8 CARDS TO LDEV    #31630
:GENMD,LDEV SECT4+41,900000FF(900001FF). FJ  F00 11/14/78 038-045 #31630
,PATCH+00,21100800.                      FJ  F00 11/14/78 039-045 #31630
,PATCH+01,694001EA+SECT4.                FJ  F00 11/14/78 040-045 #31630
,PATCH+02,680001E8+SECT4.                FJ  F00 11/14/78 041-045 #31630
,SECT4+1E6,5210019E+SECT1(330001A3+SECT1).   F00 11/14/78 042-045 #31630
,SECT4+1E7,68000000+PATCH(693001EA+SECT4).   F00 11/14/78 043-045 #31630
,SECT4+1EA,21100001(330001AE+SECT1).     FJ  F00 11/14/78 044-045 #31630
,SECT4+1EB,694001EE+SECT4(693001EE+SECT4).   F00 11/14/78 045-045 #31630
11/17/78
<ALLOCAT DUAL MESSAGE SHOULD BE LEGIBLE                           #31613
<9 PATCHES TO FIX0, 5 TO FIX1                                     #31613
FIX0/. 1/.E3C14DD5('TA S'/             2 OF 14 PAR 8/23/78        #31613
FIX0/. 1/.5DE3C9D4('TAMP'/             3 OF 14 PAR 8/23/78        #31613
FIX0/. 1/.C57EF0F0(.407EF0F0/          4 OF 14 PAR 8/23/78        #31613
FIX0/FIXHD 9/.FFD584A4('0DUA'/         5 OF 14 PAR 8/23/78        #31613
FIX0/. 1/.C1D34DE8('L ST'/             6 OF 14 PAR 8/23/78        #31613
FIX0/. 1/.5DE3C9D4('AMP '/             7 OF 14 PAR 8/23/78        #31613
FIX0/. 1/.C57EF0F0(.7EF0F0D4/          8 OF 14 PAR 8/23/78        #31613
FIX0/. 4/0/(RES)                       9 OF 14 PAR 8/23/78        #31613
11/17/78
<ALLOCAT DUAL MESSAGE SHOULD BE LEGIBLE                           #31613
<9 PATCHES TO FIX0, 5 TO FIX1                                     #31613
FIX1/FIXHGP .1CA/BAL,11 ;Q(BAL,15 ;Q/  10OF 14 PAR 8/23/78        #31613
FIX1/FIXHGP .C29/MTW SNAP .AF(STW,8 ;Q/11OF 14 PAR 8/23/78        #31613
FIX1/. 1/BE . .3F(LW,1 SNAP .AF/       12OF 14 PAR 8/23/78        #31613
FIX1/. 1/STW,8 FIXHD 2(BE . .3E/       13OF 14 PAR 8/23/78        #31613
FIX1/FIXHGP .1C3/AWM,13 4,7(STS,13 4,7/14OF 14 PAR 8/23/78        #31613
11/17/78
<SET C:MSM RIGHT EVEN IF RECOVERY BLOWS DATE OR TIME.             #31672
FIX1/FIXHGP .189/B .-.23(BAL,7 ;Q/       PAR F00 08/31/78 001-001 #31672
11/17/78
< PREVENT SC 2D-02 WHEN USER CLOSES A STREAM OUT FROM UNDER AN    #31911
< OPEN DCB CONNECTED THRU IT TO A CARD PUNCH, THEN CLOSES THE DCB #31911
<  DOING THIS WILL PREVENT THE !EOD CARD NORMALLY PUNCHED BY      #31911
<  CLOSE BUT THAT IS WHAT WAS REQUESTED BY THE SEQUENCE.          #31911
<    TWO PART PATCH 5 CARDS IN ROOT 8 CARDS IN MULOV OVERLAY.     #31911
MULOV/OPNLD+.1F1/B OPNLD+.1F8(LI,13 .70)/FJ  F00 11/03/78 006-013 #31911
MULOV/OPNLD+.200/B @(LCI 2)/             FJ  F00 11/03/78 007-013 #31911
/@/B OPNLD+.1F2/                         FJ  F00 11/03/78 009-013 #31911
MULOV/OPNLD+.1F7/B @(STS,13 1,1)/        FJ  F00 11/03/78 010-013 #31911
/@/STS,13 1,1/                           FJ  F00 11/03/78 011-013 #31911
/@/LCI 2/                                FJ  F00 11/03/78 012-013 #31911
/@/B OPNLD+.201/                         FJ  F00 11/03/78 013-013 #31911
11/17/78
< MOS SBCE LOG 2 TYPE 43'S ON SIG7'S                              #31825
#MOSTAB                                  JLJ F00 10/24/78 001-007 #31825
UMOV/CSECOM+.89/B @(CI,4 0/              JLJ F00 10/24/78 002-007 #31825
/@/CW,9 LITERALS+.20/                    JLJ F00 10/24/78 003-007 #31825
/@/BANZ CSECOM+.93/                      JLJ F00 10/24/78 004-007 #31825
/@/CI,4 0/                               JLJ F00 10/24/78 005-007 #31825
/@/B CSECOM+.8A/                         JLJ F00 10/24/78 006-007 #31825
#                                        JLJ F00 10/24/78 007-007 #31825
11/17/78
<EDIT'S MATCHANY STRING (?) SHOULD MATCH THE REST OF THE RECORD OR#31904
<THE REST OF THE COLUMN RANGE (WHICHEVER IS SMALLER) BUT AT LEAST #31904
<ONE CHARACTER, IF IT IS LAST IN THE STRING TO BE MATCHED.        #31904
,P+1143,6800000F+PATCHP(68001114+P).     PAR F00 10/31/78 001-012 #31904
,PATCHP+F,F130026F+D(0).                 PAR F00 10/31/78 002-012 #31904
,PATCHP+10,68201114+P(0).                PAR F00 10/31/78 003-012 #31904
,PATCHP+11,32400176+D(0).                PAR F00 10/31/78 004-012 #31904
,PATCHP+12,20400001(0).                  PAR F00 10/31/78 005-012 #31904
,PATCHP+13,31400187+D(0).                PAR F00 10/31/78 006-012 #31904
,PATCHP+14,68200016+PATCHP(0).           PAR F00 10/31/78 007-012 #31904
,PATCHP+15,32400187+D(0).                PAR F00 10/31/78 008-012 #31904
,PATCHP+17,68101114+P(0).                PAR F00 10/31/78 010-012 #31904
,PATCHP+18,32400189+D(0).                PAR F00 10/31/78 011-012 #31904
,PATCHP+19,68001114+P(0).                PAR F00 10/31/78 012-012 #31904
11/17/78
< MULTIPLE SUMMARY COMMANDS IN A ROW WILL CAUSE ELLA              #31153
< TO MEMORY PROTECT                                               #31153
:GENMD,ELLASUM SUM:0+8,68000004+PAT(224FF9BC).TJB F00 11/02 01-005#31153
:GENMD,ELLAROOT PAT+04,224005A6+SUM:0.   TJB F00 11/02/78 002-005 #31153
:GENMD,ELLAROOT PAT+05,354005A5+SUM:0.   TJB F00 11/02/78 003-005 #31153
:GENMD,ELLAROOT PAT+06,224FF9BC.         TJB F00 11/02/78 004-005 #31153
:GENMD,ELLAROOT PAT+07,68000009+SUM:0.   TJB F00 11/02/78 005-005 #31153
11/17/78
<INITIALIZE THE KEY FOR MAILBOX FILES BEFORE USING IT             #31935
,FILL+2F,68000000+PATCH(68000000+NO:FILL).   F00 10/30/78 001-007 #31935
,PATCH+00,22A000AB+FILLD.                LLF F00 10/30/78 002-007 #31935
,PATCH+01,35100000+NOPRINT.              LLF F00 10/30/78 003-007 #31935
,PATCH+02,22F00000.                      LLF F00 10/30/78 004-007 #31935
,PATCH+03,6AB00000+MAILBOX.              LLF F00 10/30/78 005-007 #31935
,PATCH+04,35000000+NOPRINT.              LLF F00 10/30/78 006-007 #31935
,PATCH+05,68000000+NO:FILL.              LLF F00 10/30/78 007-007 #31935
11/17/78
<LYNX SHOULD STRIP BLANKS FROM CCBUF ONLINE TOO.                  #30994
,LYNXPP+9,64700006+LYNXPP(64700007+LYNXPP).  F00 09/26/78 001-003 #30994
,LYNXPP+E,68000009+LYNXPP(207FFFFF).     PAR F00 09/26/78 002-003 #30994
,LYNXPP+8,6910000A+LYNXPP(6930000A+LYNXPP).  F00 09/26/78 003-003 #30994
11/17/78
<PASS3 LOOKS FOR HANDLERS IN WRONG ACCT ON NON-HANLERS2 SYSGEN
, +A519,70000000(3300A7FB)             .LA 01 OF 08 10/17/78 F00  #31643
, +A7F3,00000000                       .LA 03 OF 08 10/17/78 F00  #31643
, +A844,35240000                       .LA 04 OF 08 10/17/78 F00  #31643
, +A845,3300A7F2                       .LA 05 OF 08 10/17/78 F00  #31643
, +A846,6930A582                       .LA 06 OF 08 10/17/78 F00  #31643
, +A847,6800A57F                       .LA 07 OF 08 10/17/78 F00  #31643
, +A57E,6800A844(35240000)             .LA 08 OF 08 10/17/78 F00  #31643
11/17/78
<PCL SHOULDN'T THINK FMT MEANS CAT ON INPUT.                      #31521
,BLDCB+C3,22101000(22100800).            PAR F00 08/31/78 001-001 #31521
11/17/78
<PCL SHOULD BE ABLE TO GET PAST PASSWORDED TAPE FILES             #31537
,LIST+CC,32100000+PATCH(22100002).       PAR F00 09/28/78 001-004 #31537
,LIST+CD,45100000+M:EI(31100000+M:EI).   PAR F00 09/28/78 002-004 #31537
,LIST+CE,693000D0+LIST(684000D0+LIST).   PAR F00 09/28/78 003-004 #31537
,PATCH,200002.                           PAR F00 09/28/78 004-004 #31537
11/17/78
< STOP AUTO PRIORITY INCREMENT AT E NOT F                         #27817
:GENMD,RBBAT MBSOP+1D0,2140000E(2140000F). FJ F00 10/10/78 01-001 #27817
11/17/78
< MAKE SLOT # CORRECT FOR MOS SBCE SUMMARIES                      #31644
:GENMD RT+1A3A,25C00071(25CC0071).       JLJ F00 10/30/78 001-001 #31644
11/17/78
<ANSMOUNT KEYIN SHOULD CLEAR SCRATCH BIT IN AVR TABLE             #31279
KEYIN/KEYN+.290/B @(BCS,14 KEYN+.295/    MRS F00 10/05/78 001-008 #31279
/@/BCS,12 KEYN+.295/                     MRS F00 10/05/78 002-008 #31279
/@/BCR,2 KEYN+.291/                      MRS F00 10/05/78 003-008 #31279
/@/AND,15 KEYN+.6C5/                     MRS F00 10/05/78 004-008 #31279
/@/CW,9 LITERALS+.20/                    MRS F00 10/05/78 005-008 #31279
/@/LW,9 LITERALS+.20/                    MRS F00 10/05/78 007-008 #31279
/@/B KEYN+.294/                          MRS F00 10/05/78 008-008 #31279
11/17/78
<    If a B507 error occurs, its error code gets printed as a     #31639
<    B567 due to a relative branch that didn't get modified       #31639
<    when code was added to LNKTRC.                               #31639
LDLNK/LNKTRC+.55C/B LNKTRC+.554(B LNKTRC+.54F/   10/04/78 001-001 #31639
11/17/78
< DON'T GENERATE EXTRA BLANK LINES IN RBSWITCHED OUTPUT.          #31856
#HASPIO                                  FJ  F00 10/04/78 001-004 #31856
UMOV/HASPIO+.2F6/CI,15 .1F(CI,15 .80)/   FJ  F00 10/04/78 002-004 #31856
UMOV/. 1/BANZ ;Q(BNE ;Q)/                FJ  F00 10/04/78 003-004 #31856
#                                        FJ  F00 10/04/78 004-004 #31856
11/17/78
< When PPS grabs dynamic memory to try to get pages that the      #31638
< operator has asked for in a "GET" or "RESDF" command, it is     #31638
< cautious to the point of absurdity about leaving enough pages   #31638
< to fill any holes that it creates in its dynamic area.  It      #31638
< releases fully half of the pages that it initially gets - this  #31638
< is usually a severe case of overkill since the maximum number   #31638
< of fill-in pages that it will need is equal to the number of    #31638
< specific pages that it's looking for and hasn't found yet.      #31638
< This section of the patch adds code to limit the number of      #31638
< pages released for fill-in purposes to at most the number       #31638
< of holes that may develop in the data area, thus increasing     #31638
< the number of data pages that PPS can actually look at and      #31638
< try to steal.                                                   #31638
:GENMD PPS+19F,2580007F(25C0007F).       DCP F00 10/03/78 001-050 #31638
:GENMD PPS+1A0,20800001(3880000C).       DCP F00 10/03/78 002-050 #31638
:GENMD PPS+1A1,31800004+PPSDATA(4680000C).   F00 10/03/78 003-050 #31638
:GENMD PPS+1A2,68200001+PPSPATCH(048000D1+PPSDATA).       004-050 #31638
:GENMD PPS+1A3,68000000+PPSPATCH(25900077).  F00 10/03/78 005-050 #31638
:GENMD PPSPATCH+0,32800004+PPSDATA.      DCP F00 10/03/78 006-050 #31638
:GENMD PPSPATCH+1,38C00008.              DCP F00 10/03/78 007-050 #31638
:GENMD PPSPATCH+2,048000D1+PPSDATA.      DCP F00 10/03/78 008-050 #31638
:GENMD PPSPATCH+3,3280000C.              DCP F00 10/03/78 009-050 #31638
:GENMD PPSPATCH+4,25900077.              DCP F00 10/03/78 010-050 #31638
:GENMD PPSPATCH+5,680001A4+PPS.          DCP F00 10/03/78 011-050 #31638
:GENMD PPSDATA+D1,89000008(8900000C).    DCP F00 10/03/78 012-050 #31638
<                                                                 #31638
<   One reason that PPS has trouble getting the desired pages     #31638
<   is that there are sometimes shared processors sitting         #31638
<   on them.  Shared processors (and monitor overlays) are        #31638
<   "sticky" - if there's no one in core using them, they'll      #31638
<   stay in core until they're needed again or until the pages    #31638
<   they're sitting on must be freed up for a user's get-page     #31638
<   request.  In a large system, PPS can't possibly request       #31638
<   enough memory at once to force those sticky processors to     #31638
<   be flushed, and so it will never get a crack at the pages     #31638
<   they're squatting on.  This section of the patch adds code    #31638
<   to PPS to solve this problem - PPS will locate any            #31638
<   such sticky processors and will flush them out by zeroing     #31638
<   their physical page head and tail pointers and returning      #31638
<   their pages to the free page chain.  This sequence will       #31638
<   be performed before each M:GP.  It won't get done if there    #31638
<   are any slave CPUs active.                                    #31638
<                                                                 #31638
#NSCPU                                   DCP F00 10/03/78 013-050 #31638
:GENMD PPS+191,68000006+PPSPATCH(02200020).  F00 10/03/78 014-050 #31638
:GENMD PPSPATCH+6,6D000037.              DCP F00 10/03/78 015-050 #31638
:GENMD PPSPATCH+7,22700000+NSCPU.        DCP F00 10/03/78 016-050 #31638
:GENMD PPSPATCH+8,730E0000+SB:STATE.     DCP F00 10/03/78 017-050 #31638
:GENMD PPSPATCH+9,6930001A+PPSPATCH.     DCP F00 10/03/78 018-050 #31638
:GENMD PPSPATCH+A,64700008+PPSPATCH.     DCP F00 10/03/78 019-050 #31638
#ELSE                                    DCP F00 10/03/78 020-050 #31638
:GENMD PPS+191,6800000B+PPSPATCH(02200020).  F00 10/03/78 021-050 #31638
#                                        DCP F00 10/03/78 022-050 #31638
:GENMD PPSPATCH+B,22700000+PNAMEND.      DCP F00 10/03/78 023-050 #31638
:GENMD PPSPATCH+C,6D000037.              DCP F00 10/03/78 024-050 #31638
:GENMD PPSPATCH+D,730E0000+PB:UC.        DCP F00 10/03/78 025-050 #31638
:GENMD PPSPATCH+E,69300019+PPSPATCH.     DCP F00 10/03/78 026-050 #31638
#:BIG                                    DCP F00 10/03/78 027-050 #31638
:GENMD PPSPATCH+F,521E0000+PX:HPP.       DCP F00 10/03/78 028-050 #31638
:GENMD PPSPATCH+10,68300019+PPSPATCH.    DCP F00 10/03/78 029-050 #31638
:GENMD PPSPATCH+11,22400000.             DCP F00 10/03/78 030-050 #31638
:GENMD PPSPATCH+12,554E0000+PX:HPP.      DCP F00 10/03/78 031-050 #31638
:GENMD PPSPATCH+13,554E0000+PX:TPP.      DCP F00 10/03/78 032-050 #31638
:GENMD PPSPATCH+15,52120000+MX:PPUT.     DCP F00 10/03/78 034-050 #31638
#ELSE                                    DCP F00 10/03/78 035-050 #31638
:GENMD PPSPATCH+F,721E0000+PX:HPP.       DCP F00 10/03/78 036-050 #31638
:GENMD PPSPATCH+10,68300019+PPSPATCH.    DCP F00 10/03/78 037-050 #31638
:GENMD PPSPATCH+11,22400000.             DCP F00 10/03/78 038-050 #31638
:GENMD PPSPATCH+12,754E0000+PX:HPP.      DCP F00 10/03/78 039-050 #31638
:GENMD PPSPATCH+13,754E0000+PX:TPP.      DCP F00 10/03/78 040-050 #31638
:GENMD PPSPATCH+14,32300001.             DCP F00 10/03/78 041-050 #31638
:GENMD PPSPATCH+15,72120000+MX:PPUT.     DCP F00 10/03/78 042-050 #31638
#                                        DCP F00 10/03/78 043-050 #31638
:GENMD PPSPATCH+16,6A200000+T:FPP.       DCP F00 10/03/78 044-050 #31638
:GENMD PPSPATCH+17,21100000.             DCP F00 10/03/78 045-050 #31638
:GENMD PPSPATCH+18,69300014+PPSPATCH.    DCP F00 10/03/78 046-050 #31638
:GENMD PPSPATCH+19,6470000C+PPSPATCH.    DCP F00 10/03/78 047-050 #31638
:GENMD PPSPATCH+1A,6D000027.             DCP F00 10/03/78 048-050 #31638
:GENMD PPSPATCH+1B,02200020.             DCP F00 10/03/78 049-050 #31638
:GENMD PPSPATCH+1C,68000192+PPS.         DCP F00 10/03/78 050-050 #31638
11/17/78
<USE COC#BUFS, NOT BUFCNT, IN RESOURCE DISPLAY                    #31595
:GENMD,STATS CSPROC+7BC,02000000(201FFFFF).  F00 08/22/78 001-006 #31595
:GENMD,STATS CSPROC+7BD,02000000.        MRS F00 08/22/78 002-006 #31595
:GENMD,STATS CSPROC+7BE,02000000.        MRS F00 08/22/78 003-006 #31595
:GENMD,STATS CSPROC+7BF,02000000.        MRS F00 08/22/78 004-006 #31595
:GENMD,STATS CSPROC+7C0,02000000.        MRS F00 08/22/78 005-006 #31595
:GENMD,STATS CSPROC+7C1,32916004+COCD:.  MRS F00 08/22/78 006-006 #31595
10/13/78
<THE SYMBIONT SETS UP ALL LP RECS AS PRINTS WITH FORMAT (VFC).    #31822
<THE NSLP PRE-HANDLER WILL STRIP OFF ANY VFC CHAR OF X'C0' AND    #31822
<CHANGE THE CURRENT FUNCTION CODE TO PRINT W/O FORMAT.            #31822
<(TO UNDERSTAND WHY THIS IS NEEDED, REFER TO SIDR #27105 ON       #31822
<MICROFICHE.)  HOWEVER, UNLESS THE ORIGINAL FUNCTION CODE IS ALSO #31822
<MODIFIED, RETRIES WILL BE PRINT W/ FORMAT USING THE ORIGINAL     #31822
<2ND CHAR FOR VFC.                                                #31822
#NSLP                                   OL  F00  09/29/78 001-005 #31822
UMOV/NSLP+.16/B @(B HANDLERS+.BD/       OL  F00  09/29/78 002-005 #31822
/@/STB,5 IOQ4,3/                        OL  F00  09/29/78 003-005 #31822
/@/B HANDLERS+.BD/                      OL  F00  09/29/78 004-005 #31822
#                                       OL  F00  09/29/78 005-005 #31822
10/13/78
< GIVE OPERATOR WARNING WHEN OUTPUT QUEUE IS FILLING TO DANGER    #24562
< POINT. (CARD 15) REPORT WHEN IT GETS FULL (CARD 13), AND        #24562
< REPORT THAT THINGS SEEM TO BE CLEARING UP (CARD 3). IT WOULD    #24562
< TAKE TOO MANY LINES TO TELL YOU HOW TO HANDLE SITUATION.        #24562
< JUST KNOWING ABOUT IT SHOULD BE A BIG HELP.                     #24562
<                                                                 #24562
< CARDS NOTED ABOVE CAN BE ADJUSTED FOR THRESHOLD YOU WISH TO SEE.#24562
<                                                                 #24562
< THE QUEUE MAY BE FULLER THAN IS IMMEDIATELY OBVIOUS SINCE       #24562
< CONCURRENT OUTPUT TAKES 1 OUTPUT FILE SLOT PER EACH CHUNK.      #24562
,RBBP+05,09000000+TMPSTK(0).             FJ  F00 09/27/78 001-069 #24562
,RBBP+06,32000000+BL:OFS(0).             FJ  F00 09/27/78 002-069 #24562
,RBBP+08,69100011+RBBP(0).               FJ  F00 09/27/78 004-069 #24562
,RBBP+09,330001D9+SDAA(0).               FJ  F00 09/27/78 005-069 #24562
,RBBP+0A,6810000D+RBBP(0).               FJ  F00 09/27/78 006-069 #24562
,RBBP+0B,08000000+TMPSTK(0).             FJ  F00 09/27/78 007-069 #24562
,RBBP+0C,68040056+RBG(0).                FJ  F00 09/27/78 008-069 #24562
,RBBP+0D,3200002B+RBBP(0).               FJ  F00 09/27/78 009-069 #24562
,RBBP+0E,350001D9+SDAA(0).               FJ  F00 09/27/78 010-069 #24562
,RBBP+0F,22000039+RBBP(0).               FJ  F00 09/27/78 011-069 #24562
,RBBP+10,68000022+RBBP(0).               FJ  F00 09/27/78 012-069 #24562
,RBBP+11,21000002+SNDDXSIZ(0).           FJ  F00 09/27/78 013-069 #24562
,RBBP+12,6820001B+RBBP(0).               FJ  F00 09/27/78 014-069 #24562
,RBBP+13,2100000A+SNDDXSIZ(0).           FJ  F00 09/27/78 015-069 #24562
,RBBP+14,6920000B+RBBP(0).               FJ  F00 09/27/78 016-069 #24562
,RBBP+15,330001D9+SDAA(0).               FJ  F00 09/27/78 017-069 #24562
,RBBP+16,6920000B+RBBP(0).               FJ  F00 09/27/78 018-069 #24562
,RBBP+17,22000001(0).                    FJ  F00 09/27/78 019-069 #24562
,RBBP+18,350001D9+SDAA(0).               FJ  F00 09/27/78 020-069 #24562
,RBBP+19,2200002C+RBBP(0).               FJ  F00 09/27/78 021-069 #24562
,RBBP+1A,68000022+RBBP(0).               FJ  F00 09/27/78 022-069 #24562
,RBBP+1B,320001D9+SDAA(0).               FJ  F00 09/27/78 023-069 #24562
,RBBP+1C,21000001(0).                    FJ  F00 09/27/78 024-069 #24562
,RBBP+1D,6930000B+RBBP(0).               FJ  F00 09/27/78 025-069 #24562
,RBBP+1E,32000053+TABLES:(0).            FJ  F00 09/27/78 026-069 #24562
,RBBP+1F,20000001(0).                    FJ  F00 09/27/78 027-069 #24562
,RBBP+20,350001D9+SDAA(0).               FJ  F00 09/27/78 028-069 #24562
,RBBP+22,022000F0(0).                    FJ  F00 09/27/78 030-069 #24562
,RBBP+23,0B100000+TMPSTK(0).             FJ  F00 09/27/78 031-069 #24562
,RBBP+24,32400000(0).                    FJ  F00 09/27/78 032-069 #24562
,RBBP+25,6A800BD5+RBG(0).                FJ  F00 09/27/78 033-069 #24562
,RBBP+26,022000F0(0).                    FJ  F00 09/27/78 034-069 #24562
,RBBP+27,0A100000+TMPSTK(0).             FJ  F00 09/27/78 035-069 #24562
,RBBP+28,6800000B+RBBP(0).               FJ  F00 09/27/78 036-069 #24562
,RBBP+29,0(0).                           FJ  F00 09/27/78 037-069 #24562
,RBBP+2A,0(0).                           FJ  F00 09/27/78 038-069 #24562
,RBBP+2B,80000000(0).                    FJ  F00 09/27/78 039-069 #24562
,RBBP+2C,1B5C40D6.                       FJ  F00 09/27/78 040-069 #24562
,RBBP+2D,E4E3D7E4.                       FJ  F00 09/27/78 041-069 #24562
,RBBP+2E,E340D8E4.                       FJ  F00 09/27/78 042-069 #24562
,RBBP+2F,C5E4C540.                       FJ  F00 09/27/78 043-069 #24562
,RBBP+30,C1D3D4D6.                       FJ  F00 09/27/78 044-069 #24562
,RBBP+31,E2E340C6.                       FJ  F00 09/27/78 045-069 #24562
,RBBP+32,E4D3D35C.                       FJ  F00 09/27/78 046-069 #24562
,RBBP+33,175C40D6.                       FJ  F00 09/27/78 047-069 #24562
,RBBP+34,E4E3D7E4.                       FJ  F00 09/27/78 048-069 #24562
,RBBP+35,E340D8E4.                       FJ  F00 09/27/78 049-069 #24562
,RBBP+36,C5E4C540.                       FJ  F00 09/27/78 050-069 #24562
,RBBP+37,C9E240C6.                       FJ  F00 09/27/78 051-069 #24562
,RBBP+38,E4D3D35C.                       FJ  F00 09/27/78 052-069 #24562
,RBBP+39,1F5C40D6.                       FJ  F00 09/27/78 053-069 #24562
,RBBP+3B,E340D8E4.                       FJ  F00 09/27/78 055-069 #24562
,RBBP+3C,C5E4C540.                       FJ  F00 09/27/78 056-069 #24562
,RBBP+3D,E2D7C1C3.                       FJ  F00 09/27/78 057-069 #24562
,RBBP+3E,C540D9C5.                       FJ  F00 09/27/78 058-069 #24562
,RBBP+3F,E3E4D9D5.                       FJ  F00 09/27/78 059-069 #24562
,RBBP+40,C9D5C75C.                       FJ  F00 09/27/78 060-069 #24562
,RBBP+41,32800053+TABLES:(0).            FJ  F00 09/27/78 061-069 #24562
,RBBP+42,318001D9+SDAA(0).               FJ  F00 09/27/78 062-069 #24562
,RBBP+43,68200046+RBBP(0).               FJ  F00 09/27/78 063-069 #24562
,RBBP+44,358001D9+SDAA(0).               FJ  F00 09/27/78 064-069 #24562
,RBBP+45,6A800BD5+RBG(0).                FJ  F00 09/27/78 065-069 #24562
,RBBP+46,68000DC4+RBG(0).                FJ  F00 09/27/78 066-069 #24562
,SDAA+1D9,80000000(0).                   FJ  F00 09/27/78 067-069 #24562
,RBG+55,68000005+RBBP(68040056+RBG).     FJ  F00 09/27/78 068-069 #24562
,RBG+DC2,68000041+RBBP(22800DC4+RBG).    FJ  F00 09/27/78 069-069 #24562
************************* SST 10-78 *************************
10/02/78
< REPLACEMENT PATCH FOR #31611 DATED 08/22/78                     #31611
< *** SOLVES 7E-40 DURING PFSR *******************                #31611
< MAKE MOS INITIALIZATION RUN UNMAPPED..AND THUS USABLE BY GHOST1 #31611
< AND CONTROL                                                     #31611
< 2 PATCHES, 1 TO ROOT/INITIAL, 1 GENMD TO CONTROL                #31611
/@@/TUNA! $+3/                           JLJ F00 09/28/78 001-023 #31611
/@/.07000000/                            JLJ F00 09/28/78 002-023 #31611
/INITIAL+.5C/B @(CI,4 0/                 JLJ F00 09/28/78 003-023 #31611
/@/LPSD,0 TUNA/                          JLJ F00 09/28/78 004-023 #31611
/@/B INITIAL+.5D/                        JLJ F00 09/28/78 006-023 #31611
/INITIAL+.8F/B @(B *11/                  JLJ F00 09/28/78 007-023 #31611
/@/CI,11 PFSR+.A0/                       JLJ F00 09/28/78 008-023 #31611
/@/BE $+2/                               JLJ F00 09/28/78 009-023 #31611
/@/BAL,1 MAP/                            JLJ F00 09/28/78 010-023 #31611
/@/WD,0 .27/                             JLJ F00 09/28/78 011-023 #31611
/@/B *11/                                JLJ F00 09/28/78 012-023 #31611
#TUNA;K1                                 JLJ F00 09/28/78 013-023 #31611
< REPLACEMENT PATCH FOR #31611 DATED 08/22/78                     #31611
< *** SOLVES 7E-40 DURING PFSR *******************                #31611
< CONTROL CANT GO UNMAPPED TO SET RCE FLIP-FLOPS IN MOS           #31611
< MEMORY.....PERFORM THIS ACTION IN THE MONITOR ROOT...           #31611
< 2 PATCHES, 1 TO ROOT/INITIAL, 1 GENMD TO CONTROL                #31611
:GENMD,CONTROL MOS+1AE,02000000.         JLJ F00 09/28/78 014-023 #31611
:GENMD,CONTROL MOS+1AF,02000000.         JLJ F00 09/28/78 015-023 #31611
:GENMD,CONTROL MOS+1B0,02000000.         JLJ F00 09/28/78 016-023 #31611
:GENMD,CONTROL MOS+1B2,68000000+MOS:PP.  JLJ F00 09/28/78 017-023 #31611
:GENMD,CONTROL MOS:PP+0,22400001(00000BAD).  F00 09/28/78 018-023 #31611
:GENMD,CONTROL MOS:PP+1,35B00007(00000BAD).  F00 09/28/78 019-023 #31611
:GENMD,CONTROL MOS:PP+2,6AB0005C+INITIAL(00000BAD).       020-023 #31611
:GENMD,CONTROL MOS:PP+3,32B00007(00000BAD).  F00 09/28/78 021-023 #31611
:GENMD,CONTROL MOS:PP+4,6D000027(00000BAD).  F00 09/28/78 022-023 #31611
:GENMD,CONTROL MOS:PP+5,680001B3+MOS(00000BAD).  09/28/78 023-023 #31611
10/02/78
<TEST FOR BUSY MPC TAPE CHANNEL.                                  #31637
/@/CHK! LH,5 DCT1P,1/                    KRD F00 09/29/78 002-014 #31637
/@/TIO,0 0,5/                            KRD F00 09/29/78 003-014 #31637
/@/BCR,12 *15/                           KRD F00 09/29/78 004-014 #31637
/@/BCR,8 IOQ+.E8/                        KRD F00 09/29/78 005-014 #31637
/@/BCR,4 IOQ+.E8/                        KRD F00 09/29/78 006-014 #31637
/@/B *15/                                KRD F00 09/29/78 007-014 #31637
UMOV/MPCTIO+.2DE/B @(B HANDLERS+.FB/     KRD F00 09/29/78 008-014 #31637
/@/BAL,15 CHK/                           KRD F00 09/29/78 009-014 #31637
/@/B HANDLERS+.FB/                       KRD F00 09/29/78 010-014 #31637
UMOV/MPCTIO+.2EE/B @(B IOQ+.1BC/         KRD F00 09/29/78 011-014 #31637
/@/BAL,15 CHK/                           KRD F00 09/29/78 012-014 #31637
/@/CHK;KB IOQ+.1BC/                      KRD F00 09/29/78 013-014 #31637
#                                        KRD F00 09/29/78 014-014 #31637
10/02/78
<  INSTALL SIGMA 5 SPEEDUPS FOR LOADER                            #31642
#S5SIM                                   JLJ F00 09/27/78 001-004 #31642
LDR,BINSRT+13,6800002C+BINSRT(60600001). JLJ F00 09/27/78 002-004 #31642
LDR,4BNUM+3,68000022+4BNUM(61200001).    JLJ F00 09/27/78 003-004 #31642
#                                        JLJ F00 09/27/78 004-004 #31642
