pike.git/
src/
error.c
Branch:
Tag:
Non-build tags
All tags
No tags
2002-09-24
2002-09-24 13:08:09 by Martin Stjernholm <mast@lysator.liu.se>
c4670ca9d58cbb59d917067cddd48c68a2f83a60 (
31
lines) (+
22
/-
9
)
[
Show
|
Annotate
]
Branch:
7.9
Enable dump_backlog if the debug level is 1 or higher.
Rev: src/error.c:1.89
22:
#include "threads.h" #include "gc.h"
-
RCSID("$Id: error.c,v 1.
88
2002/09/
21
16
:
29
:
43
mast Exp $");
+
RCSID("$Id: error.c,v 1.
89
2002/09/
24
13
:
08
:
09
mast Exp $");
#undef ATTRIBUTE #define ATTRIBUTE(X)
210:
if(!Pike_interpreter.recoveries) { #ifdef PIKE_DEBUG
+
if (d_flag) {
+
fprintf(stderr,"No error recovery context!\n%s",buf);
dump_backlog();
-
+
}
#endif fprintf(stderr,"No error recovery context!\n%s",buf);
242:
if(!Pike_interpreter.recoveries) { #ifdef PIKE_DEBUG
+
if (d_flag) {
+
fprintf(stderr,"No error recovery context!\n%s():%s",name,text);
dump_backlog();
-
+
}
#endif fprintf(stderr,"No error recovery context!\n%s():%s",name,text);
294:
*/ Pike_inhibit_errors = 1;
-
fprintf(stderr,"%s\n",(char *)msg);
+
#ifdef PIKE_DEBUG
-
+
if (d_flag) {
+
fprintf(stderr,"%s\n",(char *)msg);
dump_backlog();
-
+
}
#endif fprintf(stderr,"%s\n",(char *)msg); #ifdef PIKE_DEBUG
333:
if (throw_severity == THROW_EXIT) return; #ifdef PIKE_DEBUG
+
if (d_flag) {
+
fprintf(stderr,"%s\n",(char *)msg);
dump_backlog();
-
+
}
#endif fprintf(stderr,"%s\n",(char *)msg); do_abort();
363:
} in_fatal = 1;
-
#if 0
+
#ifdef PIKE_DEBUG
-
+
if (d_flag) {
+
(void)VFPRINTF(stderr, fmt, args);
dump_backlog();
-
+
}
#endif
-
#endif
+
if(Pike_in_gc) fprintf(stderr,"Pike was in GC stage %d when this fatal occured:\n",Pike_in_gc);