1: /* Copyright (c) 1979 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)PERROR.c 1.2 1/10/83";
4:
5: #include <stdio.h>
6: #include <signal.h>
7:
8: /*
9: * Routine PERROR is called from the runtime library when a runtime
10: * I/O error occurs. Its arguments are a pointer to an error message and
11: * the name of the offending file.
12: */
13: long
14: PERROR(msg, fname)
15:
16: char *msg, *fname;
17: {
18: PFLUSH();
19: fputc('\n',stderr);
20: fputs(msg, stderr);
21: perror(fname);
22: kill(getpid(), SIGTRAP);
23: return 0;
24: }
Defined functions
PERROR
defined in line
13; used 15 times
Defined variables
sccsid
defined in line
3;
never used