* Copyright (c) 1980 The Regents of the University of California.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)printerror.c 5.3 (Berkeley) %G%";
* Print out an execution time error.
#include "process/process.rep"
if (p
->signo
!= ESIGNAL
&& p
->signo
!= SIGINT
) {
error("signal %d at px pc %d, lc %d", p
->signo
, p
->pc
, pc
);
skimsource(srcfilename(pc
));
if (p
->signo
== ESIGNAL
) {
printwhere(curline
, cursource
);
printlines(curline
, curline
);
* this px is no good; it is easier to kill it and start
* a new one than to make it recover...
* make runtime/callproc.c know it too.
printf("\n\ninterrupt at ");
printwhere(curline
, cursource
);
printlines(curline
, curline
);