Trailing-Edge
-
PDP-10 Archives
-
BB-L014E-BM
-
autopatch/cobddt.c05
There are 2 other files named cobddt.c05 in the archive. Click here to see a list.
REP 7/1 ;05C1
;COPYRIGHT (C) 1974, 1981 BY
WIT
;COPYRIGHT (C) 1974, 1981, 1982 BY
REP 26/1 ;05C2
EDIT==33
WIT
EDIT==43
REP 5/2 ;05C3
;.VERSION 12B
;.AUTOPATCH 4
;.EDIT 42 FIX SUBSCRIPT HANDLING TO PREVENT WRONG RESULTS WHEN USING COMP
; AST,02-OCT-81,SPR:20-16377
WIT
;.COMPONENT COBDDT
;.VERSION 12B
;.AUTOPATCH 4
;
;.EDIT 40 TOPS-20 BREAK CHARACTER SET WAS INCORRECT
; DMN,18-AUG-81,SPR:20-16565
REP 15/2 ;05C4
;.EDIT 40 TOPS-20 BREAK CHARACTER SET WAS INCORRECT
; DMN,18-AUG-81,SPR:20-16565
WIT
;.EDIT 42 FIX SUBSCRIPT HANDLING TO PREVENT WRONG RESULTS WHEN USING COMP
; AST,02-OCT-81,SPR:20-16377
INS 20/2 ;05C5
;.AUTOPATCH 5
;
;.EDIT 43 FIX DISPLAY OF QUALIFIED FIELD IN REDEFINING TABLE
; JEH,13-SEP-82,SPR:20-18199
; A:SRC COBDDT
;
;.ENDA
INS 23/8 ;05C6
DTFAL: POINT 1,4(T4),8 ;[43] FATHER/BROTHER LINK
INS 44/149 ;05C7
LDB W1,DTFAL ;[43] SAVE FATHER/BROTHER LINK VALUE
REP 3/150 ;05C8
QUAL3A: HRL T3,T4 ;SAVE DATAB LINK OF FATHER
WIT
QUAL3A: JUMPE W1,QUAL30 ;[43]IF BROTHER LINK, CANT SERVE AS QUALIFIER
HRL T3,T4 ;SAVE DATAB LINK OF FATHER
SUM 189050