FNIT	MACRO M1110  22-AUG-78 01:42  PAGE 2





      1						.TITLE	FNIT

      2						.IDENT	/01/

      3

      4					;

      5					; COPYRIGHT   1973,  DIGITAL  EQUIPMENT  CORP.,  MAYNARD,   MASS.

      6					; COPYRIGHT   1974,  DIGITAL  EQUIPMENT  CORP.,  MAYNARD,   MASS.

      7					;

      8					; THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE

      9					; ON A  SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION

     10					; OF DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT

     11					; AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC.

     12					;

     13					; THE  INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT

     14					; NOTICE AND  SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL

     15					; EQUIPMENT CORPORATION.

     16					;

     17					; DEC  ASSUMES NO  RESPONSIBILITY  FOR  THE  USE  OR RELIABILITY

     18					; OF ITS  SOFTWARE ON  EQUIPMENT WHICH  IS NOT SUPPLIED BY DEC.

     19					;

     20					; VERSION 01

     21					;

     22					; C. MONIA 05-FEB-74

     23					;

     24					; INITIALIZE FCS IMPURE AREA

     25					;

     26					; MACRO LIBRARY CALLS

     27					;

     28					;

     29

     30						.MCALL	FINIT$

     31

     32					;+

     33					; **-$FINIT-INITIALIZE FCS IMPURE AREA

     34					;

     35					;	THIS ROUTINE IS CALLED PRIOR TO PERFORMING ANY I/O

     36					; TO SETUP FILE STORAGE REGION 2.

     37					;

     38					; INPUTS:

     39					;

     40					;	NONE

     41					;

     42					; OUTPUTS:

     43					;

     44					;	FSR 2 IS SETUP

     45					;

     46					;-

     47

     48

     49	000000				$FINIT::			;

     50	000000					FINIT$			; INITIALIZE FSR 2

     51	000004					RETURN			;

     52

     53		000001 				.END

FNIT	MACRO M1110  22-AUG-78 01:42  PAGE 2-1

SYMBOL TABLE



CR    = 000015   	HT    = 000011   	R$$11M= 000000   	VT    = 000013   	.FINIT= ****** G

FF    = 000014   	LF    = 000012   	SPA   = 000040   	$FINIT  000000RG



. ABS.	000000	   000

      	000006	   001

ERRORS DETECTED:  0



VIRTUAL MEMORY USED:  563 WORDS  ( 3 PAGES)

DYNAMIC MEMORY:  2772 WORDS  ( 10 PAGES)

ELAPSED TIME:  00:00:05

OBJ$:FNIT,LIS$:FNIT/-SP=SRC$:MACFLM,FNIT

