pike.git/
src/
pike_types.c
Branch:
Tag:
Non-build tags
All tags
No tags
2001-03-05
2001-03-05 18:53:40 by Henrik Grubbström (Grubba) <grubba@grubba.org>
5f29fd846210832a0914d935e77df24f2ebf2e35 (
5
lines) (+
3
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Improved pike_type_hash some more.
Rev: src/pike_types.c:1.160
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: pike_types.c,v 1.
159
2001/03/
04
23
:
31
:
27
grubba Exp $");
+
RCSID("$Id: pike_types.c,v 1.
160
2001/03/
05
18
:
53
:
40
grubba Exp $");
#include <ctype.h> #include "svalue.h" #include "pike_types.h"
274:
{ unsigned INT32 hash = DO_NOT_WARN((unsigned INT32) ((ptrdiff_t)type*0x10204081)^
-
((ptrdiff_t)car)^
+
(
0x8003*
(ptrdiff_t)car)^
~(0x10001*(ptrdiff_t)cdr)); unsigned INT32 index = hash % pike_type_hash_size; struct pike_type *t;