pike.git/ src/ stralloc.c

1996-10-08

1996-10-08 04:24:50 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• ca74dd50e111af589f62face92f7ee50c7655f32 (12 lines) (+8/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

dynamic module loading implemented

Rev: src/ChangeLog:1.8
Rev: src/Makefile.src:1.10
Rev: src/configure.in:1.7
Rev: src/dynamic_load.c:1.1
Rev: src/dynamic_load.h:1.1
Rev: src/machine.h.in:1.6
Rev: src/main.c:1.7
Rev: src/stralloc.c:1.2
Rev: src/stralloc.h:1.2

102:    return 0; /* not found */   }    - struct pike_string *findstring(const char *foo) + struct pike_string *binary_findstring(const char *foo, INT32 l)   { -  int l; -  l=strlen(foo); +     return internal_findstring(foo, l, StrHash(foo,l));   }    -  + struct pike_string *findstring(const char *foo) + { +  return binary_findstring(foo, strlen(foo)); + } +    /*    * find a string that is already shared and move it to the head    * of that list in the hastable
148:   {    struct pike_string *t;    t=(struct pike_string *)xalloc(len + sizeof(struct pike_string)); +  t->str[len]=0;    t->len=len;    return t;   }
166:    free((char *)s);    s=s2;    }else{ -  s->str[len]=0; +     s->refs = 0;    s->next = base_table[h];    base_table[h] = s;