Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
lnkov2.c07
There is 1 other file named lnkov2.c07 in the archive. Click here to see a list.
REP 2/1 ;07C1
SUBTTL D.M.NIXON/DMN/JLd/RKH/JNG/MCHC/DZN/PY/PAH 6-Jan-83
WIT
SUBTTL D.M.NIXON/DMN/JLd/RKH/JNG/MCHC/DZN/PY/PAH 2-Jun-83
REP 36/1 ;07C2
DECEVR==2026 ;DEC EDIT VERSION
WIT
DECEVR==2042 ;DEC EDIT VERSION
INS 62/2 ;07C3
;2042 Protect pointers to GS and LC when calling TR.WLK.
REP 28/11 ;07C4
PUSHJ P,TR.WLK## ;THESE ARE ONLY LINKS WE CAN REACH
WIT
;**;[2042] Replace at OVR6C+11 Lines PY 2-Jun-83
PUSHJ P,OVR6TW ;[2042] THESE ARE ONLY LINKS WE CAN REACH
REP 37/11 ;07C5
PUSHJ P,TR.WLK## ;SEE IF WE CAN SEE IT
WIT
;**;[2042] Replace at OVR6C+20 Lines PY 2-Jun-83
PUSHJ P,OVR6TW ;[2042] SEE IF WE CAN SEE IT
REP 8/13 ;07C6
PUSHJ P,TR.WLK## ;SINCE THESE ARE THE ONLY LINKS WE
WIT
;**;[2042] Replace at OVR6M+5 Lines PY 2-Jun-83
PUSHJ P,OVR6TW ;[2042] SINCE THESE ARE THE ONLY LINKS WE
REP 19/13 ;07C7
PUSHJ P,TR.WLK## ;SEE IF WE CAN GET TO IT
WIT
;**;[2042] Replace at OVR6MA+3 Lines PY 2-Jun-83
PUSHJ P,OVR6TW ;[2042] SEE IF WE CAN GET TO IT
REP 12/14 ;07C8
PUSHJ P,TR.WLK## ;SEE IF WE CAN GET TO IT
WIT
;**;[2042] Replace at OVR6MD+1 Line PY 2-Jun-83
PUSHJ P,OVR6TW ;[2042] SEE IF WE CAN GET TO IT
INS 50/15 ;07C9
;**;[2042] Insert before OVR6D PY 2-Jun-83
OVR6TW: SUB P3,GS.LB ;[2042] Subtract the base addresses
SUB R2,LC.LB ;[2042] Because TR.WLK calls DY.GET
PUSHJ P,TR.WLK## ;[2042] Walk the tree
ADD P3,GS.LB ;[2042] Add the base addresses back
ADD R2,LC.LB ;[2042] LC better not be paging!
POPJ P, ;[2042] And return
SUM 256262