
 
		THE FORTRAN IV-PLUS COMPILER
  
 	The FORTRAN IV-PLUS compiler is an optimizing Fortran compiler 
 capable of producing in-line code. It can potentially produce a Fortran 
 program which executes almost as fast as an assembly language program.
  
 	By convention   /SW  sets the switch action, and  /NOSW  negates
 the switch action ( SW  represents a switch).  The command line to the 
 compiler looks like
  
 	Object-File, List-File/listswitch = Source-File/switches
  
 The default extensions are .FTN for the Source-File, and .OBJ for the
 Object-File.
 
 Further HELP may be obtained by typing HELP F4P KEYWORD, using
 one of the following keywords.
	ERRORS		(Options for getting HELP on errors)
	ERROR Rnn	(HELP for a specific Runtime error number)
	ERROR Cnn	(HELP for a specific Compile error number)
	LIST		(Listing Switch Summary)
	RENAME		(RENAMING a file from a F4P program)
	SWITCHES	(Summary of F4P compiler switches)
  
2	ERRORS
	@F4PERROR.HLP
2	LIST
 F4P LISTING OPTIONS
 /LI:n		  Specifies listing options.  (Defaults to LI:2)
  
 	n=0	  Minimal listing file. Diagnostic messages and program 
 		  section summary only.
  
 	n=1	  Source listing and program section summary.
  
 	n=2	  Source listing, program section summary, and storage map.
  
 	n=3	  Source listing, assembly code, program section summary, 
 		  and storage map.

	n=100000  Assembly code only.  (undocumented)
  
2	SWITCHES
		  F4P Compiler Switch Options
 
		/CK		check array references
		/CO		specify number of continuation lines
		/DE		compile debug lines
		/ID		print compiler version number
		/I4		allocate 2 words/integer
		/LA		lock switch setting
		/LI		list switch
		/RO		generate read only code
		/SP		spool listing file
		/TR		controls error traceback
		/WF		specify number of work files
		/WR		enable warning diagnostics
 
 Switch default summary:
  
	 	/NOCK/CO:40/NODE/NOI4/NOLA/LI:2/RO/NOSP/TR:NONE/WF:2/WR
	
 HELP on any of these switches may be obtained by typing  HELP F4P SWITCH /sw.
 where   sw  is the desired switch.
 
3	CK
 /CK		Code is generated to check that all array references are 
 		within array address bounds.  The default is  /NOCK
		Use of this switch makes the task size larger and 
		execution times slower, but it is useful for debugging.
  
3	CO
 /CO:n		A maximum of  n  continuation lines are permitted in the 
 		program, 0<=n<=99.  The default value is 40.  The number
 		n is expressed as a decimal number if followed by a 
 		period.  Otherwise it is interpreted as an octal number.
  
3	DE
 /DE		Compile lines with a D in column 1.  These lines are 
 		treated as comment lines by the default /NODE switch.
  
3	ID
 /ID		Print the compiler version number.  The default is /NOID.
  
3	I4
 /I4		Allocate two words for default length integer and 
 		logical variables.  /NOI4 is the default.
  
3	LA
 /LA		Causes the current switch settings to be retained
 		(latched) for subsequent compilations.  Default is /NOLA
  
3	LIST
 /LI:n		Specifies listing options.  (Default is /LI:2)
		Type HELP F4P LIST for details.
  
3	RO
 /RO		Directs the compiler to specify pure code and pure data 
 		sections as READ ONLY(RO).  The default is /RO.
  
3	SP
 /SP		Automatically spool listing file.  The default is /NOSP.
  
3	TR
 /TR:XXX	The /TR switch controls the amount of extra code 
 		included in the compiled output for use in error 
 		traceback.  The default is /TR:NONE
 	/TR
 	/TR:ALL
 	/TR:LINES	Error traceback is compiled for all source 
 			statements, and function and subroutine entries.
  
 	/TR:BLOCKS	Traceback information is compiled for subroutine 
 			and function entries and for certain selected 
 			source statements (starting off a block).
  
 	/TR:NAMES	Traceback information is compiled only for 
 			subroutine and function entries.
  
 	/TR:NONE
 	/NOTR		Disables all traceback (and produces shorter, 
 			faster executing programs).
  
3	WF
 /WF:n			The /WF switch determines the number of temporary
			external workfiles used to compile the program.
 			One, two, or three files can be used.  One file 
 			produces the shortest compilation time, but can
 			compile the smallest number of statements.   
 			Three files can compile three times as many  
 			statements as one file but requires three times  
 			more time per statement than one work file 
 			compilations.  The default is /WF:2.
  
3	WR
 /WR			Enable compiler warning diagnostics (w-class 
 			messages).  The default is /WR.
  
2	RENAME
 
	The FORTRAN callable subroutine RENAME may be used to rename a
	file from within an executing F4P program.  The routine resides in
	[1,1]F4POTS.OLB and will automatically be linked to the user's task
	if called.
 
  FORTRAN CALL:
 	CALL RENAME(LUN1,LUN2,IERR)
 
 	LUN1 - THE UNIT NUMBER OF THE OLD FILE, WHICH MUST BE OPEN
 	LUN2 - THE UNIT NUMBER OF THE NEW FILE NAME INFORMATION
 		USE 'CALL ASSIGN'
 	IERR - RETURN STATUS:	FCS ERROR CODE OR 0
 

