.TITLE	FCSRES - FCS RESIDENT LIBRARY FILE
	.IDENT	/M0101/
;
; COPYRIGHT   1974,  DIGITAL  EQUIPMENT  CORP.,  MAYNARD,   MASS.
;
; THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE
; ON A  SINGLE COMPUTER SYSTEM AND CAN BE  COPIED (WITH INCLUSION
; OF DEC'S COPYRIGHT  NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT
; AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC.
;
; THE  INFORMATION  IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
; NOTICE  AND  SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
; EQUIPMENT CORPORATION.
;
; DEC  ASSUMES NO  RESPONSIBILITY  FOR  THE  USE  OR  RELIABILITY
; OF  ITS  SOFTWARE ON  EQUIPMENT WHICH  IS  NOT SUPPLIED BY DEC.
;
; PETER H. LIPMAN	22-OCT-74
;
;
; THIS FILE DOCUMENTS HOW TO BUILD AN FCS RESIDENT LIBRARY,
; AND IT DEFINES ALL OF THE POSSIBLE MODULES THAT MIGHT GO INTO
; SUCH A LIBRARY.
;
; IT SHOULD BE UNDERSTOOD THAT PRECISELY HOW MUCH GOES INTO FCSRES
; IS ACTUALLY DEPENDENT ON WHICH PROGRAMS ARE GOING TO USE IT AND WHAT
; THOSE PROGRAMS REQUIRE.  THE IMPORTANT POINT TO BEAR IN MIND
; IS THAT A PROGRAM LINKING TO FCSRES MAY NOT GET MISSING FCS MODULES
; FROM THE SYSLIB.OLB OBJECT LIBRARY FILE AS WELL. A PROGRAM NEEDING
; FCS MODULES WHICH WERE NOT PLACED IN FCSRES WOULD HAVE NO CHOICE
; BUT TO LINK WITHOUT FCSRES AND USE ALL THE MODULES OUT OF SYSLIB.
;
; FOR THE OBVIOUS REASONS OF SIZE, THE MINIMUM AMOUNT SHOULD BE PUT IN
; FCSRES CONSISTENT WITH THE NEEDS OF THE PROGRAMS USING IT.
;
; THOSE ENTRY POINTS THAT ARE INVOKED BY MACROS ARE DOCUMENTED BELOW
; SO THAT IT IS POSSIBLE TO PICK WHAT SHOULD GO INTO FCSRES.
;
; IT IS INTENDED THAT THIS FILE BE EDITED TO ELIMINATE UNDESIRED 
; MODULES FROM FCSRES.
;
;	THE ACTUAL BUILDING OF FCSRES INVOLVES THE FOLLOWING:
;	1) ASSEMBLE THIS MODULE
;
;	MAC> FCSRES,FCSRES=FCSRES
;
;	2) BUILD THE LIBRARY
;
;	SET /UIC=[1,1]
;
; TO BUILD FCSRES FOR A MAPPED SYSTEM:
;
;	TKB>[1,1]FCSRES/-HD/MM/PI,LP:,SY:[1,1]FCSRES=[200,200]FCSRES
;	TKB>/
;	TKB>STACK=0
;	TKB>PAR=FCSRES:0:20000
;	TKB//
;
; TO BUILD AN FCSRES ON AN UNMAPPED SYSTEM:
;
;	TKB>SY:[1,1]FCSRES/-HD/-MM/PI,LP:,SY:[1,1]FCSRES=[200,200]FCSRES
;	TKB>/
;	TKB>STACK=0
;	TKB>PAR=FCSRES:140000:20000
;	TKB>//
;

	.MCALL	CALLR
	.PSECT	$$RESL
;
; OPENING FILES
;
	.GLOBL	.OPEN		;OPEN$X, OPNS$X, OPNT$X
.OPFID::CALLR	.OPEN		;OFID$X CAN USE THE OPEN$X CODE
	.GLOBL	.OPFNB		;OFNB$X - USED FOR FORTAN RUN TIME
;
; CLOSING FILES
;
	.GLOBL	.CLOSE		;CLOSE$
;
; RECORD I/O
;
	.GLOBL	.GET,.PUT	;GET$, AND PUT$, GET$R, AND PUT$R
.PUTSQ::CALLR	.PUT		;PUT$S CAN USE PUT$ CODE
.GETSQ::CALLR	.GET		;GET$S CAN USE GET$ CODE
;
; BLOCK I/O
;
	.GLOBL	.READ,.WRITE,.WAIT ;READ$, WRITE$, AND WAIT$
;
; DELETE FILES
;
	.GLOBL	.DELET		;DELET$
	.GLOBL	.MRKDL		;USED BY OPNT$D
;
; THE FOLLOWING MODULE IS NORMALLY NOT USED, DELET$ IS MUCH MORE COMMON
;
;	.GLOBL	.DLFNB		;DELETE BY FILE NAME BLOCK		; JGD INSERT ;
;
; FILE EXTENSION
;
	.GLOBL	.EXTND
;
; DIRECTORY OPERATIONS
;
	.GLOBL	.FIND,.ENTER,.REMOV
;
; FILE POSITIONING
;
	.GLOBL	.POINT,.MARK
;
; ESTABLISH DIRECTORY ID
;
	.GLOBL	.GTDID,.GTDIR
;
; RENAME FILE
;
;	.GLOBL	.RENAM			; JGD INSERT ;
;
; READ AND WRITE FILE STORAGE REGION CELLS
;
	.GLOBL	.RDFDR,.WDFDR,.RFOWN,.WFOWN,.RDFFP,.WDFFP
;
; ISSUE GENERAL QI/O AND SPECIAL MAGTAPE FUNCTION QI/OS
;
;	.GLOBL	.XQIO,.CTRL			; JGD INSERT ;
;
;
	.END