Trailing-Edge
-
PDP-10 Archives
-
bb-y390o-bm_tops20_v41_atpch_20
-
autopatch/cblio.c15
There are 11 other files named cblio.c15 in the archive. Click here to see a list.
INS 4/2 ;15C1
;MEM 01-OCT-86 [1166] PDL size is off by 20
;RLF 09-SEP-86 [1164] Buffer is cleared if OPEN EXTEND with SAME AREA
REP 28/7 ;15C2
MOVEI AC10,20(AC10) ;[660] LENGTH+20
WIT
MOVE AC10,%PUSHL(AC10);[1166]GET LENGTH
ADDI AC10,20 ;[1166] LENGTH + 20
INS 418/47 ;15C3
TXNN AC16,OPN%EX ;[1164] open extend?
REP 36/180 ;15C4
GD67: MOVEI AC0,ACSAV0 ;
BLT AC0,ACSAV0+16 ;
WIT
GD67: MOVEI AC0,ACSAV0 ;[1163]
BLT AC0,ACSAV0+16 ;[1163]
REP 45/180 ;15C5
HRLZI AC0,ACSAV0
BLT AC0,AC16
WIT
HRLZI 16,ACSAV0 ;[1163]
BLT 16,AC16 ;[1163]
REP 5/185 ;15C6
DGD67: MOVE AC0,[XWD AC4, ACSAV0+4] ;
BLT AC0,ACSAV0+16 ;SAVE ACS
WIT
DGD67: MOVE AC0,[XWD AC4, ACSAV0+4] ;[1163]
BLT AC0,ACSAV0+16 ;[1163]SAVE ACS
REP 11/185 ;15C7
MOVE AC0,[XWD ACSAV0+4, AC4] ;
BLT AC0,AC16 ;
WIT
MOVE AC0,[XWD ACSAV0+4, AC4] ;[1163]
BLT AC0,AC16 ;[1163]
SUM 193966