;*********************************************************************
;
; THIS ODL FILE WILL BUILD THE DEC UTILITY WITH A 4K FCS RESIDENT
; LIBRARY.  IN GENERAL A 1-2K OR GREATER SAVING IN CORE WILL RESULT
; WITH UP TO 16 DISK BLOCKS OR MORE OF DISK SPACES SAVED(MUCH MORE
; FOR CDA(~40 blocks).  PROBABLY GREATER SAVINGS COULD BE REALIZED
; BY FURTHER OVERLAYING BUT IN THE CASES I EXAMINED ONE WOULD NEED
; TO GO BACK TO THE SOURCES AND BREAK UP A FEW OF THE MODULES STIL
; FURTHER.
;
;			JAMES G. DOWNWARD
;			KMS FUSION, INC.
;			3941 RESEARCH PARK. DR.
;			ANN ARBOR, MICH. 48104
;			(313) 769-8500
;**********************************************************************
	.NAME	EDIT
	.NAME	FCS
	.PSECT	CMTBL,D,GBL
	.ROOT	MAIN,FCSERR
MAIN:	.FCTR	EDIT-E1-*(E2,E3,E4,E5)
 
E1:	.FCTR 	EDI/LB:EDIMP:EDMRS:TTYIO
E2:	.FCTR	EDI/LB:MSCCM
E3:	.FCTR	EDI/LB:EDMCM
E4:	.FCTR	EDI/LB:SRCCM
E5:	.FCTR	EDI/LB:START-(E6,E7,E8,E9,E10,E11,E12)
E6:	.FCTR	EDI/LB:BOTTM
E7:	.FCTR	EDI/LB:MCALL
E8:	.FCTR	EDI/LB:SAVE
E9:	.FCTR	EDI/LB:FILE
E10:	.FCTR	EDI/LB:UNSAV
E11:	.FCTR	EDI/LB:OPCLS
E12:	.FCTR	LB:[1,1]VMLIB/LB:INIDM-SY:[1,20]EDI/LB:EDEXT
 
FCSERR:	.FCTR	FCS-*(EDI/LB:ERROR,F1-CMTBL,F2,F5)
F1:	.FCTR	EDI/LB:EDSUB:GETNM:CMSUB
F2:	.FCTR	LB:[1,1]SYSLIB/LB:RENAME
F5:	.FCTR	EDI/LB:SCAN:LINMP
	.END