INIBIT.MAC;4/AU/-BF=[12,10]INIBIT.MAC;3
-2,2
	.IDENT	/03.01/
-29,,/;PW001/
;	PW001	CORRECT STORAGE BITMAP INITIALIZATION
;		WHEN INDEX FILE IS LARGER THAN 256 BLOCKS.
;
-235,,/;PW001/
;		EXCEPTION: WHEN R2 POINTS AT $INDXF, SIZE OF BLOCK
;		GROUP IS IN $IXFSZ (FULL WORD), NOT IN 1(R2).
-253,,/;PW002/
	CMP	R2,#$INDXF		;IS THIS INDEX FILE?
	BNE	5$			;N - JUMP
	MOV	$IXFSZ,R3		;Y - GET FILE SIZE FROM SPEC
5$:
/