1*1424dfb3SchristosNR == 1 { 2*1424dfb3Schristos FS="\""; 3*1424dfb3Schristos print "/* ==> Do not modify this file!! It is created automatically" 4*1424dfb3Schristos printf " from %s using the gen-c-prog.awk script. <== */\n\n", FILE 5*1424dfb3Schristos print "#include <stdio.h>" 6*1424dfb3Schristos print "#include \"ansidecl.h\"" 7*1424dfb3Schristos} 8*1424dfb3Schristos 9*1424dfb3Schristos { 10*1424dfb3Schristos if (curfun != FUNCTION) 11*1424dfb3Schristos { 12*1424dfb3Schristos if (curfun) 13*1424dfb3Schristos print "}" 14*1424dfb3Schristos curfun = FUNCTION 15*1424dfb3Schristos print "" 16*1424dfb3Schristos print "void ", FUNCTION, "(FILE *);" 17*1424dfb3Schristos print "void"; 18*1424dfb3Schristos printf "%s (FILE *file)\n", FUNCTION 19*1424dfb3Schristos print "{"; 20*1424dfb3Schristos } 21*1424dfb3Schristos printf " fputs (\""; 22*1424dfb3Schristos for (i = 1; i < NF; i++) 23*1424dfb3Schristos printf "%s\\\"", $i; 24*1424dfb3Schristos printf "%s\\n\", file);\n", $NF; 25*1424dfb3Schristos} 26*1424dfb3Schristos 27*1424dfb3SchristosEND { print "}" } 28