Google
 

Trailing-Edge - PDP-10 Archives - bb-jr93i-bb - xl3780.c08
There are 10 other files named xl3780.c08 in the archive. Click here to see a list.
 REP 69/2	;08C1

	V3780=033
 WIT
	; 4(034)	2-JAN-84
	;		remove edit 33

	V3780=034
 REP 41/24	;08C2
		BEQ	40$		;no, done with this chunk
 WIT
		BEQ	22$		;no, done with this chunk
 REP 75/24	;08C3

	41$:	CALL	XLIPRS		;yes, process an irs
 WIT
		CALL	XLIPRS		;yes, process an irs
 DEL 86/24	;08C4
	;end of message - check if we need to do end of line processing

	40$:	TST	TCHPS(R5)	;if at beginning of line...
		BEQ	22$		;then we don't have to worry
		BIT	#TCPRI,TCFG1(R5) ;lpt?
		BNE	41$		;yes - go do lpt IRS
		BR	31$		;no - do cdr IRS

 SUM 187261