MTDRV.MAC;2/AU:72.=MTDRV.OLD;1/-BF
\
-2,2
	.IDENT	/04.08N/
-66
;
;		NAPC -- LENGTHEN TIMEOUT PERIODS
;			UNIMPLEMENT POWERFAIL TECHNIQUE
;			DON'T LOG RECORD LENGTH ERRORS
;
%
-201,202,/;NAPC/
LGFCN:	DFENT	IO.RLB,10.,0,RED,0,RDBLK ;READ LOGICAL BLOCK
	DFENT	IO.WLB,10.,0,WRT,0,WRBLK ;WRITE LOGICAL BLOCK
-206,207,/;NAPC/
	DFENT	IO.SPB,10.,0,SPF,1,SPCBK ;SPACE BLOCK
	DFENT	IO.SPF,10.,0,SPF,2,SPCFL ;SPACE FILE
-611,611,/;NAPC/
	BICB	#US.PWF,U.STS(R5)	;DON'T SET POWER FAIL
-740,740,/;NAPC/
	BIT	#DS.ILG!DS.CRE!DS.PAE!DS.BGL!DS.BTE,R1
-842,842,/;NAPC/
	BNE	490$		;IF NE YES
-899,899,/;NAPC/
	BIT	#DS.ILG!DS.CRE!DS.PAE!DS.BGL!DS.BTE,R1
/