pike.git / src / stralloc.c

version» Context lines:

pike.git/src/stralloc.c:8:   #include "pike_macros.h"   #include "dynamic_buffer.h"   #include "pike_macros.h"   #include "pike_memory.h"   #include "error.h"   #include "gc.h"   #include "stuff.h"      #include <ctype.h>    - RCSID("$Id: stralloc.c,v 1.50 1998/11/22 11:03:18 hubbe Exp $"); + RCSID("$Id: stralloc.c,v 1.51 1998/12/06 22:54:15 hubbe Exp $");      #define BEGIN_HASH_SIZE 997   #define MAX_AVG_LINK_LENGTH 3   #define HASH_PREFIX 64      unsigned INT32 htable_size=0;   static unsigned int hashprimes_entry=0;   static struct pike_string **base_table=0;   static unsigned INT32 full_hash_value;   unsigned INT32 num_strings=0;
pike.git/src/stralloc.c:599:       h=do_hash(s);    propagate_shared_string(s,h);    base_table[h]=s->next;   #ifdef PIKE_DEBUG    s->next=(struct pike_string *)-1;   #endif    num_strings--;   }    + void do_free_string(struct pike_string *s) + { +  free_string(s); + } +    void really_free_string(struct pike_string *s)   {   #ifdef PIKE_DEBUG    extern int d_flag;    if(d_flag > 2)    {    if(s->next == (struct pike_string *)-1)    fatal("Freeing shared string again!\n");       if(((long)s->next) & 1)