pike.git/
src/
stralloc.c
Branch:
Tag:
Non-build tags
All tags
No tags
2000-10-08
2000-10-08 19:07:35 by Henrik Grubbström (Grubba) <grubba@grubba.org>
2eed0b6bc3b3316a22a18cf3b72e4ec0a21047ab (
10
lines) (+
6
/-
4
)
[
Show
|
Annotate
]
Branch:
7.9
Minor change.
Rev: src/stralloc.c:1.102
25:
#define HUGE HUGE_VAL #endif /*!HUGE*/
-
RCSID("$Id: stralloc.c,v 1.
101
2000/
09
/
15
00
:
59
:
39
mast
Exp $");
+
RCSID("$Id: stralloc.c,v 1.
102
2000/
10
/
08
19
:
07
:
35
grubba
Exp $");
#define BEGIN_HASH_SIZE 997 #define MAX_AVG_LINK_LENGTH 3
498:
*/ PMOD_EXPORT struct pike_string *low_end_shared_string(struct pike_string *s) {
-
ptrdiff_t len
,
h;
+
ptrdiff_t len
;
+
size_t
h;
struct pike_string *s2; len = s->len; h = do_hash(s);
-
s2 = internal_findstring(s->str,len,s->size_shift,h);
+
s2 = internal_findstring(s->str,
len,
s->size_shift,
h);
#ifdef PIKE_DEBUG if(s2==s) fatal("end_shared_string called twice! (or something like that)\n");
512:
if(s2) { free((char *)s);
-
s=s2;
+
s
=
s2;
}else{ link_pike_string(s, h); }