Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
qmangr.c12
There are no other files named qmangr.c12 in the archive.
REP 40/1 ;12C1
QMAEDT==:2257 ;EDIT NUMBER
WIT
QMAEDT==:2263 ;EDIT NUMBER
INS 215/3 ;12C2
; 2263 Move check for ACK code to after check for packet from
; IPCC, otherwise can't use debugging feature.
; 18-Apr-85 GCO 10193 /JAD
;
REP 46/36 ;12C3
;**;[2256] Insert 3 lines at RCVA.A+0L /LWS
RCVA.A: MOVE S2,ACKCOD(E) ;[2256] GET ACK CODE WE'RE EXPECTING
CAME S2,.MSCOD(M) ;[2256] IS IT?
JRST RCVACK ;[2256] NO, IGNORE IT
SKIPN DEBUGW ;DEBUGGING?
WIT
;**;[2263]REMOVE 3 LINES AT RCVA.A+0L 18-APR-85/JAD
RCVA.A: SKIPN DEBUGW ;DEBUGGING?
REP 55/36 ;12C4
RCVA.0: LOAD S2,.MSFLG(M) ;GET THE MESSAGE STATUS WORD
WIT
;**;[2263]ADD 3 LINES AT RCVA.0+0L 18-APR-85/JAD
RCVA.0: MOVE S2,ACKCOD(E) ;[2263] GET ACK CODE WE'RE EXPECTING
CAME S2,.MSCOD(M) ;[2263] IS IT?
JRST RCVACK ;[2263] NO, IGNORE IT
LOAD S2,.MSFLG(M) ;GET THE MESSAGE STATUS WORD
SUM 139253