Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99g-bb - lsu.c05
There is 1 other file named lsu.c05 in the archive. Click here to see a list.
 REP 2/1	;05C1
	TITLE	LSU FOR LIBOL
 WIT
	TITLE	LSU FOROp LIBOL
 REP 14/1	;05C2

	;V12 *****

	; WTK	01-Nov-80	;[654] Supplement ENQ/DEQ error return message.
	; HAM	03-Oct-80	;[650] Make CNTRY external.
 WIT
	;
	;V12B ****
	; DMN/JM 15-Sep-81	;[1000] Fix SMU RETAIN of relative files in COBOL-74
	;V12A ****
	; WTK	01-Nov-80	;[654] Supplement ENQ/DEQ error return message.
	; HAM	03-Oct-80	;[650] Make CNTRY external.
	; HAM	29-Jul-80	;[643] Set proper long term ENQ lock bit
	;V12 *****
 INS 40/36	;05C3
	IFN ANS74, <
		DPB	AT1,CRRBLK	;[1000] PUT BLOCK NO IN CUR REC RET BLK
		POPJ	PP,		;[1000] AND RETURN
	>; [1000] AND IFN ANS74
 SUM 5809