 #NOTE: On the IAS and VMS implementations, where characters are stored
 #      as logical*1 (bytes), DEC requires that common block dimensions
 #      be an even number.   These dimensions have been adjusted
 #      accordingly.
 #------------------------------------------------------------------
 ## preprocessor common block to hold info about lines and included files
 # put on a file named 'cline'
 # Used only by ratfor preprocessor
 
 common /cline/ level, linect(NFILES), infile(NFILES),
                fnamp, fnames(MAXFNAMES)
 
   integer level        # level of file inclusion; init = 1
   integer linect       # line count on input file(level); init = 1
   integer infile       # file number(level); init infile(1) = STDIN
   integer fnamp        # next free slot in fnames; init = 2
   character fnames     # stack of include names; init fnames(1) = EOS
