pike.git / src / stralloc.c

version» Context lines:

pike.git/src/stralloc.c:616:    htable_size=BEGIN_HASH_SIZE;    base_table=(struct pike_string **)xalloc(sizeof(struct pike_string *)*htable_size);    MEMSET((char *)base_table,0,sizeof(struct pike_string *)*htable_size);   }      void cleanup_shared_string_table(void)   {    unsigned INT32 e;    struct pike_string *s,*next;    +  if(!base_table) return; +  +    #if defined(DEBUG) && defined(DEBUG_MALLOC)    if(verbose_debug_exit)    {    INT32 num,size;    count_memory_in_strings(&num,&size);    if(num)    {    fprintf(stderr,"Strings left: %d (%d bytes) (zapped)\n",num,size);    dump_stralloc_strings();    }    }   #endif    -  if(!base_table) return; -  +     for(e=0;e<htable_size;e++)    {    for(s=base_table[e];s;s=next)    {    next=s->next;   #ifdef REALLY_FREE    free((char *)s);   #else    s->next=0;   #endif