Trailing-Edge
-
PDP-10 Archives
-
SRI_NIC_PERM_SRC_1_19910112
-
7/ft3/monitor/stanford/free.dif
There are no other files named free.dif in the archive.
; FREE.MAC.2 & <MONITOR>FREE.MAC.1 24-Feb-89 1717 PAGE 1
LINE 1, PAGE 1
1) ;[MACBETH.STANFORD.EDU]SRC:<7.FT3.MONITOR.STANFORD>FREE.MAC.2, 17-Jun-88 18:20:49, Edit by A.APPLEHACKS
1) ; FT7 Clock Merge
1) ; UPD ID= 8704, RIP:<7.MONITOR>FREE.MAC.8, 20-Apr-88 11:22:06 by RASPUZZI
1) ;TCO 7.1278 - Make RELRNG a BUGCHK for the release.
1) ; UPD ID= 8686, RIP:<7.MONITOR>FREE.MAC.7, 17-Mar-88 19:22:38 by RASPUZZI
1) ;TCO 7.1258 - Have FSPREM scan the linked free space blocks and return
1) ; the largest block size.
1) ;[MACBETH]SRC:<7.FT2.MONITOR.STANFORD>FREE.MAC.2, 4-Apr-88 23:59:45, Edit by A.APPLEHACKS
1) ; FT7.2 Merge
1) ; UPD ID= 8677, RIP:<7.MONITOR>FREE.MAC.6, 3-Mar-88 14:55:03 by RASPUZZI
LINE 1, PAGE 1
2) ; Edit= 8833 to FREE.MAC on 20-Apr-88 by RASPUZZI (TCO 7.1278)
2) ;Install TCO 7.1278 - supress ONSTR/OFFSTR and make RELRNG a BUGCHK again.
2) ;TCO 7.1278 - Make RELRNG a BUGCHK for the release.
2) ; Edit= 8803 to FREE.MAC on 18-Mar-88 by RASPUZZI
2) ;Prevent ILMNRF BUGHLTs in the RESBSW code that sets the free space bit table
2) ;writeable. It is only setting the first page of the bit table and we could be
2) ;using the second page.
2) ; UPD ID= 8686, RIP:<7.MONITOR>FREE.MAC.7, 17-Mar-88 19:22:38 by RASPUZZI
2) ;TCO 7.1258 - Have FSPREM scan the linked free space blocks and return
2) ; the largest block size.
2) ; UPD ID= 8677, RIP:<7.MONITOR>FREE.MAC.6, 3-Mar-88 14:55:03 by RASPUZZI
LINE 16, PAGE 1
1) ;[MACBETH]SRC:<7.FT1.MONITOR.STANFORD>FREE.MAC.2, 1-Feb-88 21:42:13, Edit by A.APPLEHACKS
1) ; FT7 Merge
1) ;
1) ; UPD ID= 100, RIP:<7.MONITOR>FREE.MAC.3, 4-Sep-87 10:53:55 by MCCOLLUM
LINE 17, PAGE 1
2) ; UPD ID= 100, RIP:<7.MONITOR>FREE.MAC.3, 4-Sep-87 10:53:55 by MCCOLLUM
LINE 28, PAGE 1
1) ;------------------------- Autopatch Tape # 13 -------------------------
1) ; *** Edit 7207 to FREE.MAC by WAGNER on 9-Dec-85
1) ; Fix RETRIEVAL so that multiple requests do not result in failures due to lack
1) ; of free space. Reduce incidence of FSPOUT BUGINFs.
1) ;------------------------- Autopatch Tape # 12 -------------------------
1) ; Edit 7140 to FREE.MAC by WAGNER on 27-Aug-85, for SPR #838626 (TCO 6-1-1530)
LINE 26, PAGE 1
2) ; *** Edit 7207 to FREE.MAC by WAGNER on 9-Dec-85
2) ; Fix RETRIEVAL so that multiple requests do not result in failures due to lack
2) ; of free space. Reduce incidence of FSPOUT BUGINFs.
2) ; Edit 7140 to FREE.MAC by WAGNER on 27-Aug-85, for SPR #838626 (TCO 6-1-1530)
; FREE.MAC.2 & <MONITOR>FREE.MAC.1 24-Feb-89 1717 PAGE 2
LINE 16, PAGE 50
1) MOVE T3,LCKADR ;GET ADDRESS OF DESCRIPTOR BLOCK
1) HRRZ T3,.REBTB(T3) ;GET ADDRESS OF START OF BIT TABLE
1) IDIVI T3,PGSIZ ;GET PAGE NUMBER OF BIT TABLE
1) MOVX T4,PTWR ;GET WRITE FLAG
1) IORM T4,@[EP. RSECMP(T3)] ;SET WRITE ACCESS IN MONITOR MAP
1) MOVE T3,LCKADR ;GET ADDRESS AGAIN
1) MOVE T3,.REBTB(T3)
1) CLRPT (T3) ;LET HARDWARE KNOW
LINE 16, PAGE 50
2) HRRZ T3,T1 ;[8803] Get bit table address
2) LSH T3,-PGSFT ;[8803] Get page number only
2) MOVX T4,PTWR ;GET WRITE FLAG
2) IORM T4,@[EP. RSECMP(T3)] ;SET WRITE ACCESS IN MONITOR MAP
2) MOVE T3,T1 ;[8803] Get address again
2) CLRPT (T3) ;LET HARDWARE KNOW
LINE 30, PAGE 50
1) IDIVI T3,PGSIZ ;BACK TO PAGE NUMBER OF BIT TABLE
1) MOVX T1,PTWR ;GET WRITE FLAG
1) ANDCAM T1,@[EP. RSECMP(T3)] ;CLEAR WRITE-ENABLE
1) MOVE T4,LCKADR ;GET ADDRESS OF DESCRIPTOR BLOCK
1) MOVE T2,.REBTB(T4) ;GET ADDRESS OF BIT TABLE
1) CLRPT (T2) ;LET HARDWARE KNOW
LINE 28, PAGE 50
2) LSH T3,-PGSFT ;[8803] Want page number of bit table
2) MOVX T1,PTWR ;GET WRITE FLAG
2) ANDCAM T1,@[EP. RSECMP(T3)] ;CLEAR WRITE-ENABLE
2) MOVE T2,T1 ;[8803] Get address of bit table
2) CLRPT (T2) ;LET HARDWARE KNOW