From a8f9bd711d43f5ec76ae7dd2bd6d41777efe4d46 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Thu, 15 Oct 1998 04:38:49 +0200
Subject: [PATCH] Fixed bug introduced with last fix.

Rev: src/stralloc.c:1.46
---
 src/stralloc.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/stralloc.c b/src/stralloc.c
index c61546d05b..f329e2c65e 100644
--- a/src/stralloc.c
+++ b/src/stralloc.c
@@ -15,7 +15,7 @@
 
 #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,7 +91,7 @@ static INLINE unsigned INT32 generic_extract (const void *str, int size, int pos
 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 {
-- 
GitLab