Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99e-bb - cleand.c05
There are 2 other files named cleand.c05 in the archive. Click here to see a list.
 INS 20/1	;05C1
	;SMI	15-OCT-82	[1417] FIX 68274 CONVERSION OF WRITE
 REP 82/4	;05C2
		CAIE	TB,%%ACC
		JRST	CC8.		;SPECIFIED
		HRRZI	TB,%ACC.S	;ASSUME SEQUENTIAL
		DPB	TB,FI.ACC
 WIT
	;[1417]	CAIE	TB,%%ACC
	;[1417]	JRST	CC8.		;SPECIFIED
	;[1417]	HRRZI	TB,%ACC.S	;ASSUME SEQUENTIAL
	;[1417]	DPB	TB,FI.ACC
 REP 25/6	;05C3
	B4.4D:	LDB	TC,FI.ACC	;ACCESS MODE
		CAIN	TC,%%ACC	;DO WE HAVE AN ACCESS MODE?
		MOVEI	TC,%ACC.S	;NO, MAKE IT SEQUENTIAL.
		DPB	TC,FI.ACC##
 WIT
	B4.4D:	LDB	TC,FI.ACCOC	;ACCESS MODE
	;[1417]	CAIN	TC,%%ACC	;DO WE HAVE AN ACCESS MODE?
	;[1417]	MOVEI	TC,%ACC.S	;NO, MAKE IT SEQUENTIAL.
	;[1417]	DPB	TC,FI.ACC##
 SUM 9238