summaryrefslogtreecommitdiff
path: root/lang/pike76/files/patch-stralloc.c
blob: 50c28ad6bd4e4a908aa3e52cc0b57f5c7fdcb7c5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
--- src/stralloc.c.old	Fri Nov 18 11:06:05 2005
+++ src/stralloc.c	Fri Nov 18 11:06:10 2005
@@ -2,7 +2,7 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: stralloc.c,v 1.169 2005/01/19 13:06:57 grubba Exp $
+|| $Id: stralloc.c,v 1.170 2005/11/18 01:14:22 nilsson Exp $
 */
 
 #include "global.h"
@@ -24,7 +24,7 @@
 #include <ctype.h>
 #include <math.h>
 
-RCSID("$Id: stralloc.c,v 1.169 2005/01/19 13:06:57 grubba Exp $");
+RCSID("$Id: stralloc.c,v 1.170 2005/11/18 01:14:22 nilsson Exp $");
 
 /* #define STRALLOC_USE_PRIMES */
 
@@ -1596,6 +1596,7 @@
 	add_ref(a = old);
       } else {
 	link_pike_string(a, a->hval);
+	add_ref(a);
       }
       return a;
     }else{