Trailing-Edge
-
PDP-10 Archives
-
BB-L014E-BM
-
autopatch/srtjss.c04
There are no other files named srtjss.c04 in the archive.
REP 2/1 ;04C1
SUBTTL D.L. CAMPBELL/DZN/DMN/BRF 3-Jun-81
WIT
SUBTTL D.L. CAMPBELL/DZN/DMN/BRF/GCS 13-Apr-82
REP 11/1 ;04C2
;COPYRIGHT (C) 1977, 1981 BY DIGITAL EQUIPMENT CORPORATION
WIT
;COPYRIGHT (C) 1977, 1981, 1982 BY DIGITAL EQUIPMENT CORPORATION
REP 26/55 ;04C3
HRRZ T1,COLPTR ;[C20] GET WORD
MOVE T1,(T1) ;[C20] ..
TRNE T1,1 ;CHECK FOR SEQUENCE NUMBER
JRST [AOS COLPTR ;IT IS
MOVNI T1,5
ADDM T1,COLPTR+1 ;ACCOUNT FOR 5 BYTES
JRST COLCHR] ;LOOP BACK
WIT
;**;[500] @COLCHR + 3L Delete 7 lines. GCS 13-APR-82
SUM 38972