|
|
@ -1,5 +1,5 @@ |
|
|
|
/*
|
|
|
|
** $Id: ltable.c,v 1.128 2003/02/20 20:12:39 roberto Exp roberto $ |
|
|
|
** $Id: ltable.c,v 1.129 2003/03/18 12:50:04 roberto Exp roberto $ |
|
|
|
** Lua tables (hash) |
|
|
|
** See Copyright Notice in lua.h |
|
|
|
*/ |
|
|
@ -54,11 +54,11 @@ |
|
|
|
#endif |
|
|
|
|
|
|
|
|
|
|
|
#define hashg(t,n) (gnode(t, lmod((n), sizenode(t)))) |
|
|
|
|
|
|
|
#define hashnum(t,n) \ |
|
|
|
(gnode(t, lmod(cast(lu_hash, cast(ls_hash, n)), sizenode(t)))) |
|
|
|
#define hashstr(t,str) (gnode(t, lmod((str)->tsv.hash, sizenode(t)))) |
|
|
|
#define hashboolean(t,p) (gnode(t, lmod(p, sizenode(t)))) |
|
|
|
#define hashnum(t,n) hashg(t, cast(lu_hash, cast(ls_hash, (n)))) |
|
|
|
#define hashstr(t,str) hashg(t, (str)->tsv.hash) |
|
|
|
#define hashboolean(t,p) hashg(t, p) |
|
|
|
|
|
|
|
/*
|
|
|
|
** avoid modulus by power of 2 for pointers, as they tend to have many |
|
|
|