X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Ffree-hook.c;h=4dbd9ba6ab11de72ea3622b9363e92d393844435;hb=7e9928fa6e268139372afb019f8cf3d3c63108a8;hp=5022b5767b27856064ca440b2733de8fcdc63bb4;hpb=f52a96980ed9280f8f906a20d4b899dc0b027644;p=chise%2Fxemacs-chise.git diff --git a/src/free-hook.c b/src/free-hook.c index 5022b57..4dbd9ba 100644 --- a/src/free-hook.c +++ b/src/free-hook.c @@ -491,6 +491,8 @@ log_gcpro (char *file, int line, struct gcpro *value, blocktype type) if (value == gcprolist->next->next) goto OK; if (! gcprolist->next->next) abort (); if (value == gcprolist->next->next->next) goto OK; + if (! gcprolist->next->next->next) abort (); + if (value == gcprolist->next->next->next->next) goto OK; abort (); OK:; } @@ -587,6 +589,7 @@ show_gcprohist (void) gcprohist[j].type == gcpro2_type ? "GCPRO2" : gcprohist[j].type == gcpro3_type ? "GCPRO3" : gcprohist[j].type == gcpro4_type ? "GCPRO4" : + gcprohist[j].type == gcpro5_type ? "GCPRO5" : gcprohist[j].type == ungcpro_type ? "UNGCPRO" : "???"), gcprohist[j].value); }