11648Smckusick /* Copyright (c) 1979 Regents of the University of California */ 21648Smckusick 3*10225Smckusick static char sccsid[] = "@(#)ERROR.c 1.10 01/10/83"; 41648Smckusick 52179Smckusic #include <stdio.h> 6*10225Smckusick #include <signal.h> 71648Smckusick 81648Smckusick /* 93867Smckusic * Routine ERROR is called from the runtime library when a runtime 103867Smckusic * error occurs. Its arguments are a pointer to an error message and 113867Smckusic * an error specific piece of data. 121648Smckusick */ 133002Smckusic long 143867Smckusic ERROR(msg, d1, d2) 151648Smckusick 163857Smckusic char *msg; 173867Smckusic long d1, d2; 183857Smckusic { 191648Smckusick PFLUSH(); 201648Smckusick fputc('\n',stderr); 215665Smckusic fprintf(stderr, msg, d1, d2); 22*10225Smckusick kill(getpid(), SIGTRAP); 233867Smckusic return d1; 241648Smckusick } 25