mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2025-01-28 03:45:12 +03:00
Code Issues Packages Projects Releases Wiki Activity

another way to normalize -0 that avoids problems with very small

Browse Source 
numbers (adding 1 turns them all into 1)
This commit is contained in:
Roberto Ierusalimschy 2007-04-18 16:24:35 -03:00
parent 619be354c8
commit ae00b3a76f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ltable.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltable.c,v 2.35 2006/09/11 14:07:24 roberto Exp roberto $
** $Id: ltable.c,v 2.36 2007/04/10 12:18:17 roberto Exp roberto $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@ -84,8 +84,8 @@ static const Node dummynode_ = {
static Node *hashnum (const Table *t, lua_Number n) {
unsigned int a[numints];
int i;
n += 1; /* normalize number (avoid -0) */
lua_assert(sizeof(a) <= sizeof(n));
if (luai_numeq(n, 0)) /* avoid problems with -0 */
return gnode(t, 0);
memcpy(a, &n, sizeof(a));
for (i = 1; i < numints; i++) a[0] += a[i];
return hashmod(t, a[0]);