Branch: Tag:

1999-04-08

1999-04-08 23:54:29 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

coredump fix (I hope)

Rev: src/constants.c:1.16
Rev: src/interpret.c:1.119
Rev: src/main.c:1.69

15:   #include "error.h"   #include "block_alloc.h"    - RCSID("$Id: constants.c,v 1.15 1999/03/02 03:13:13 hubbe Exp $"); + RCSID("$Id: constants.c,v 1.16 1999/04/08 23:54:26 hubbe Exp $");      static INT32 num_callable=0;   static struct mapping *builtin_constants = 0;
153:      void cleanup_added_efuns(void)   { + #ifdef DO_PIKE_CLEANUP    if(builtin_constants)    {    free_mapping(builtin_constants);    builtin_constants=0;    } -  free_all_callable_blocks(); + #endif   }   void count_memory_in_callables(INT32 *num_, INT32 *size_)   {    *num_=num_callable;    *size_=num_callable*sizeof(struct callable);   }