Google
 

Trailing-Edge - PDP-10 Archives - bb-kl11f-bm_tops20_v7_0_atpch1_19 - autopatch/tfr.c13
There are 3 other files named tfr.c13 in the archive. Click here to see a list.
 REP 24/1	;13C1
	IF1	<PRINTX	TFR Version 4(231)>
 WIT
	IF1	<PRINTX	TFR Version 4(233)>
 INS 9/2	;13C2
	;BCM	5-Nov-85	[233] Correct edit 227, just use T1 which is
	;				already setup
 REP 38/57	;13C3
	CBLL.2:	LOAD	T,.LENG			;[227] GET THE FIELD LENGTH
		SKIPN	T			;[227] IF THE LENGTH IS ZERO
		 AOJA	ARG,CBLLUP		;[227] THEN DON'T GENERATE ANYTHING
 WIT
	CBLL.2:	JUMPE	T1,CBLL.6		;[233] No picture for zero len field
 SUM 29044