Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
lnkold.c08
There is 1 other file named lnkold.c08 in the archive. Click here to see a list.
REP 2/1 ;08C1
SUBTTL D.M.NIXON/DMN/JLd/RKH/JBC/JNG/DCE/MCHC/DZN/PY/MFB/PAH 29-Aug-83
WIT
SUBTTL D.M.NIXON/DMN/JLd/RKH/JBC/JNG/DCE/MCHC/DZN/PY/MFB/PAH/JBS 23-Mar-84
REP 37/1 ;08C2
DECEVR==2047 ;DEC EDIT VERSION
WIT
DECEVR==2064 ;DEC EDIT VERSION
INS 86/6 ;08C3
;2057 Don't hang if symbol table is fouled up.
;2064 Clear P1 in T11CHx to avoid HALT when loading relocatable overlays.
REP 20/55 ;08C4
JRST T.5LP ;NO
WIT
JRST E02SFU ;[2057] NO, SYMBOL TABLE FOULED UP
REP 33/87 ;08C5
SY.CHF## ;-3 FULL WORD FIXUP CHAIN
WIT
;**;[2064] Change one line at STRTAB+6. PAH 23-MAR-84
T11CHF ;[2064] -3 FULL WORD FIXUP CHAIN
INS 36/89 ;08C6
;**;[2064] Add two lines at T11CHR+3. PAH 23-MAR-84
SETZ P1, ;[2064] Clear leftover pointer so P1
;[2064] isn't treated as a fixup pointer
INS 42/89 ;08C7
;**;[2064] Add two lines at T11CHL+3. PAH 23-MAR-84
SETZ P1, ;[2064] Clear leftover pointer so P1
;[2064] isn't treated as a fixup pointer
INS 46/89 ;08C8
;**;[2064] Add 7 lines at T11CHL+7. PAH 23-MAR-84
;[2064] Here to clear P1 before going to the fullword chained fixup
;[2064] routine -- that routine calls others which interpret a nonzero
;[2064] value in P1 as a fixup block pointer.
T11CHF: SETZ P1, ;[2064] Clear leftover pointer so P1
;[2064] isn't treated as a fixup pointer
PUSHJ P,SY.CHF## ;[2064] Do the fullword chained fixup
POPJ P, ;[2064] And return to the dispatcher
DEL 27/119 ;08C9
SUBTTL THE END
SUM 242861