2000-04-16
2000-04-16 22:25:06 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
d9ad017cf24d7f1df1dd3e96e584f229779072ef
(9 lines)
(+8/-1)
[
Show
| Annotate
]
Branch: 7.9
more paranoia..
Rev: src/mapping.c:1.76
5:
\*/
/**/
#include "global.h"
- RCSID("$Id: mapping.c,v 1.75 2000/04/16 22:11:34 hubbe Exp $");
+ RCSID("$Id: mapping.c,v 1.76 2000/04/16 22:25:06 hubbe Exp $");
#include "main.h"
#include "object.h"
#include "mapping.h"
1723: Inside #if defined(PIKE_DEBUG)
if(m->debug_size != md->size)
{
+ if(Pike_in_gc)
+ {
+ fprintf(stderr,"Pike was in GC stage %d when this fatal occured:\n",Pike_in_gc);
+ Pike_in_gc=0;
+ }
+
fprintf(stderr,"--MAPPING ZAPPING (%d!=%d), mapping:\n",m->debug_size,md->size);
describe(m);
fprintf(stderr,"--MAPPING ZAPPING (%d!=%d), mapping data:\n",m->debug_size,md->size);