# #FILE = CLINE.RAT FOR RATFOR.RAT COMMON /CLINE/ LEVEL, INFILE(NFILES), LINECT, INIF INTEGER LEVEL # LEVEL OF FILE INCLUSION; INIT = 1 INTEGER INFILE # FILE NUMBER(LEVEL); INIT INFILE(1) = STDIN INTEGER LINECT # SOURCE CODE LINE NUMBER, INIT=1 INTEGER INIF # =YES WHEN INSIDE AN UNDEFINED IFDEF; INIT=NO