M11OV.MAC;4/AU/-BF=M11OV.MAC;3
\
-2,2
	.IDENT	/03.02/
-23,23
; VERSION:	03.02
%
-40,,/;PW003/
;	PW003	FIX PROBLEM WITH WINDOW SIZE WHEN
;		MORE THAN 64 RETRIEVAL POINTERS IN USE
;		IN INDEX FILE AND I/O OPTIMIZATION
;		IS SELECTED.
;
;	HJL059	FIX PROBLEM SOTHAT DEFAULT WINDOW SIZE
;		IS NOT SET TO THAT OF INDEX FILE WINDOW.
-90,,/; HJL059/
WISIZ:	.WORD	0	;SIZE OF INDEX FILE WINDOW
-184,,/;HJL059/
70$:	MOVB	V.WISZ(R5),WISIZ	;SET DEF. WINDOW SIZE FOR INDX F
	CLRB	WISIZ+1		;ZERO HIGH BYTE
-188,188,/;HJL059/
	MOVB	H.SBCL(R4),R0	;GET STORAGE BIT MAP CLUSTER FACTOR
-330,330,/;PW003/
62$:	CLR	R1
	BISB	M.USE(R2),R1	;GET NUMBER OF POINTER WORDS IN USE
-339,339,/;PW003/
621$:	CLR	R4
	BISB	V.WISZ(R5),R4	;GET DEFAULT WINDOW SIZE
-348,348,/;HJL059/
	MOV	R4,WISIZ	;SET SIZE OF INDEX FILE WINDOW
-353,353,/;HJL059/
	MOV	WISIZ,R1	;GET SIZE OF INDEX FILE WINDOW
-366,366,/;HJL059/
	MOVB	WISIZ,W.WISZ(R3)	;SET SIZE OF INDX FILE WINDOW
-372,372,/;HJL059/
	MOV	WISIZ,R0	;GET SIZE OF WINDOW
/