f77/fcom/error.c

51 	fprintf(diagfile, "Warning on line %d of %s: ", lineno, infname);
52 	vfprintf(diagfile, s, ap);
53 	fprintf(diagfile, "\n");
64 	fprintf(diagfile, "Error on line %d of %s: ", lineno, infname);
65 	vfprintf(diagfile, s, ap);
66 	fprintf(diagfile, "\n");
99 	fprintf(diagfile, "Error on line %d of %s: Execution error ",
101 	vfprintf(diagfile, s, ap);
102 	fprintf(diagfile, "\n");
113 	fprintf(diagfile, "Compiler error line %d of %s: ", lineno, infname);
114 	vfprintf(diagfile, s, ap);
115 	fprintf(diagfile, "\n");