pike.git/
src/
error.c
Branch:
Tag:
Non-build tags
All tags
No tags
2000-04-16
2000-04-16 22:10:31 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
a3bcd7915abfaedfcfd4723243218735d7be0d90 (
12
lines) (+
11
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
fix for fatal in gc() (I hope)
Rev: src/error.c:1.46
20:
#include "threads.h" #include "gc.h"
-
RCSID("$Id: error.c,v 1.
45
2000/04/
12
18
:
40
:
12
hubbe Exp $");
+
RCSID("$Id: error.c,v 1.
46
2000/04/
16
22
:
10
:
31
hubbe Exp $");
#undef ATTRIBUTE #define ATTRIBUTE(X)
273:
(void)VFPRINTF(stderr, fmt, args); abort(); }
+
in_fatal = 1; #ifdef PIKE_DEBUG dump_backlog(); #endif
-
+
{
+
extern int Pike_in_gc;
+
if(Pike_in_gc)
+
{
+
fprintf(stderr,"Pike was in GC stage %d when this fatal occured:\n",Pike_in_gc);
+
Pike_in_gc=0;
+
}
+
(void)VFPRINTF(stderr, fmt, args); d_flag=t_flag=0;