Trailing-Edge
-
PDP-10 Archives
-
bb-jr93f-bb
-
7,6/ap012/algddt.c12
There are 13 other files named algddt.c12 in the archive. Click here to see a list.
REP 1/7 ;12C1
SUBTTL Common routines - DDT,KA10,KI10,ONTRACE,OFFTRACE action routines.
WIT
SUBTTL Common routines - DDT,KA10,KI10,ONTRACE,OFFTRACE routines
DEL 57/20 ;12C2
SKIPE %DDTBE(DB) ; [E127] If FNDADR established context
HRLM DL,%DDTPC(DB) ; [E127] Save correct DL
REP 26/38 ;12C3
DDTERR 1,^D12 ; NOT THERE.
HLRE A4,A5 ; GET WORD-COUNT
SKIPL A4
DDTERR 1,^D13
WIT
DDTERR 1,^D12 ; NOT THERE.
HLRE A4,A5 ; GET WORD-COUNT
SKIPL A4
DDTERR 1,^D13
REP 37/38 ;12C4
ADD A3,[
IN A1] ; MORE UUO'S
XCT A3 ; DUMP MODE READ WHOLE THING.
SKIPA ; WORKED
DDTERR 1,^D14 ; DIDN'T
ADD A6,[
RELEASE ]
WIT
ADD A3,[IN A1] ; MORE UUO'S
XCT A3 ; DUMP MODE READ WHOLE THING.
TRNA ; WORKED
DDTERR 1,^D14 ; DIDN'T
ADD A6,[RELEASE]
REP 52/131 ;12C5
LDB A7,[
POINT 3,FL,20] ; YES - GET ERROR ACTION-CODE.
WIT
LDB A7,[POINT 3,FL,20] ; YES - GET ERROR ACTION-CODE.
SUM 166398