Branch: Tag:

1998-10-15

1998-10-15 02:38:49 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Fixed bug introduced with last fix.

Rev: src/stralloc.c:1.46

15:      #include <ctype.h>    - RCSID("$Id: stralloc.c,v 1.45 1998/10/15 02:34:37 grubba Exp $"); + RCSID("$Id: stralloc.c,v 1.46 1998/10/15 02:38:49 grubba Exp $");      #define BEGIN_HASH_SIZE 997   #define MAX_AVG_LINK_LENGTH 3
91:   INLINE unsigned INT32 index_shared_string(struct pike_string *s, int pos)   {   #ifdef DEBUG -  if(pos >= s->len || pos<0) { +  if(pos > s->len || pos<0) {    if (s->len) {    fatal("String index %d is out of range [0 - %d]!\n", pos, s->len-1);    } else {