Google
 

Trailing-Edge - PDP-10 Archives - bb-jr93f-bb - 7,6/ap013/isam.c13
There are 10 other files named isam.c13 in the archive. Click here to see a list.
 REP 29/1	;13C1
	EDIT==212
 WIT
	EDIT==213
 INS 80/2	;13C2
	;.ENDA
	;.ENDV
	;.VERSION 12C
	;.AUTOPATCH 13
	;
	;.EDIT 213	Fix the INPUT file LOOKUP failure to put IF1LB+3 into TB
	;;		so that the error code can be used.
	;		MJC,26-AUG-85,SPR:20-20804
	;		A:SRC ISAM
	;
	;.ENDA
 REP 22/11	;13C3
		 PUSHJ	PP,LOOKF	;WHAT HAPPENED?
 WIT
		  PUSHJ	PP,IFLOKF	;[213]WHAT HAPPENED?
 INS 40/52	;13C4
	IFLOKF:	HRRZ	TB,IF1LB+3	;[213]GET INPUT FILE LOOKUP ERROR CODE
 SUM 181524