|
|
1.1 ! root 1: /* Copyright (c) 1979 Regents of the University of California */ ! 2: ! 3: static char sccsid[] = "@(#)ERROR.c 1.10 1/10/83"; ! 4: ! 5: #include <stdio.h> ! 6: #include <signal.h> ! 7: ! 8: /* ! 9: * Routine ERROR is called from the runtime library when a runtime ! 10: * error occurs. Its arguments are a pointer to an error message and ! 11: * an error specific piece of data. ! 12: */ ! 13: long ! 14: ERROR(msg, d1, d2) ! 15: ! 16: char *msg; ! 17: long d1, d2; ! 18: { ! 19: PFLUSH(); ! 20: fputc('\n',stderr); ! 21: fprintf(stderr, msg, d1, d2); ! 22: kill(getpid(), SIGTRAP); ! 23: return d1; ! 24: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.