0045#                      ******************0043#                        FILE=RATDEF.RT0045#                      ******************0005#0075#==============DEFINITIONS FOR RT-11 RATFOR PREPROCESSOR===============0005#0057DEFINE (DEFAULTOPEN="SY:")	#DEFAULT FOR INCLUDE FILES0057DEFINE(VNUMBER,"RATFOR/RT-11  Y20.4")	#VERSION NUMBER0044#LINK LIBRARY FOR COMPILE/LINK/GO OPTION0041DEFINE (LINKLIBRARY, "SY:FORLIB.OBJ")0048DEFINE (STDIN=1)		#STANDARD INPUT FILE LUN  ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^0049DEFINE (STDOUT=8)		#STANDARD OUTPUT FILE LUN 0056DEFINE (LISTOUT=6)		#LUN OF STANDARD LISTING OUTPUT 0042DEFINE (USERIN=5)		#COMMAND INPUT LUN 0047DEFINE (USEROUT=7)		#USER'S TERMINAL LUN!!!0005#0054DEFINE (ASCII,)			#TURN OFF CONVERSION IN RAT1,2,30069DEFINE (BUFSIZE=160) 		#PUSHBACK BUFFER FOR 'NGETCH' AND 'PUTBAK'0076DEFINE (CONTINCHAR=DOLLAR)	#FORTRAN CONTINUATION LINES FLAG CHAR (COL 6)0026DEFINE (LEXBREAK=-110)0035DEFINE (LEXDIGITS=<LEXBREAK-1>)0031DEFINE (LEXDO=<LEXBREAK-2>)^^^^^^^^^^^^^^^^^^^^^^0033DEFINE (LEXELSE=<LEXBREAK-3>)0032DEFINE (LEXEND=<LEXBREAK-4>)0032DEFINE (LEXFOR=<LEXBREAK-5>)0031DEFINE (LEXIF=<LEXBREAK-6>)0033DEFINE (LEXNEXT=<LEXBREAK-7>)0034DEFINE (LEXOTHER=<LEXBREAK-8>)0035DEFINE (LEXREPEAT=<LEXBREAK-9>)0035DEFINE (LEXUNTIL=<LEXBREAK-10>)0035DEFINE (LEXWHILE=<LEXBREAK-11>)0036DEFINE (LEXRETURN=<LEXBREAK-12>)0034DEFINE (LEXSTOP=<LEXBREAK-13>)0036DEFINE (LEXDEFINE=<LEXBREAK-14>)0035DEFINE (LEXMACRO=<LEXBREAK-15>)0035DEFINE (LEXIFDEF=<LEXBREAK-16>)0035DEFINE (LEXIFNOT=<LEXBREAK-17>)^0035DEFINE (LEXENDIF=<LEXBREAK-18>)0036DEFINE (LEXINCLUD=<LEXBREAK-19>)0035DEFINE (LEXSTRNG=<LEXBREAK-20>)0023DEFINE (MACTYPE=-9)0055DEFINE (MAXCARD=90) 		#LENGTH OF INPUT/OUTPUT LINES0065DEFINE (MAXCHARS=8) 		#MAX CHARACTER STRING SIZE FOR 'OUTNUM'0053DEFINE (MAXDEF=80) 		#MAX LENGTH OF A DEFNINITION0061DEFINE (MAXFORSTK=120)		#MAX SPACE FOR FOR REINIT CLAUSES0075DEFINE (MAXLINE=<MAXCARD+1>)	#SIZE OF STRING TO HOLD INPUT/OUTPUT LINES0067DEFINE (MAXNAME=16)		#!!! RT-11 !!! MAX FILESPEC LENGTH (CHRS).^^^^^^^0067DEFINE (MAXPTR=200) 		#MAX NUMBER OF DEFINED SYMBOLIC CONSTANTS0054DEFINE (MAXSTACK=100)		#MAX STACK DEPTH FOR PARSER0070DEFINE (MAXSTR=300)		#MAX NUMBER OF CHAR IN ALL STRINGS IN A PROG.0056DEFINE (MAXTBL=2200) 		#MAX CHARS IN ALL DEFINITIONS0046DEFINE (MAXTOK=70) 		#MAX CHARS IN A TOKEN0064DEFINE (NFILES=3) 		#MAX DEPTH OF FILE INCLUSION !!!RT-11!!!0070DEFINE (NOT=BANG) 		#EXCLAMATION MARK FOR ASCII; CHANGE FOR EBCDIC0047DEFINE (NLOP=4)			#NUMBER OF /L:xxx OPTIONS^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^0055DEFINE (NSWT=10)		#TOTAL NUMBER OF OPTIONS/SWITCHES0059DEFINE (NUMSTR=20)		#MAX NUMBER OF STRINGS IN 1 PROGRAM0063DEFINE (PAGELENGTH=57)		#LISTING PAGE LENGTH; 57 FOR 6 L/IN0065DEFINE (PASSCHAR=DOLLAR)	#1 CHAR. TO PASS ARGUMENTS TO MACROS0058DEFINE (STRINGS,)		#COMMENT TO UNDEFINE STRING KEYWORD0080#===========================================================================^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^