mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2025-02-24 17:14:14 +03:00
Code Issues Packages Projects Releases Wiki Activity

detail

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2001-01-26 13:58:50 -02:00
parent ac390020e9
commit b82242d4c4
3 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lobject.h
View File

@ -1,5 +1,5 @@
/*
** $Id: lobject.h,v 1.87 2001/01/19 13:20:30 roberto Exp roberto $
** $Id: lobject.h,v 1.88 2001/01/25 16:45:36 roberto Exp roberto $
** Type definitions for Lua objects
** See Copyright Notice in lua.h
*/
@ -199,6 +199,11 @@ typedef struct Hash {
#define ismarked(x) ((x)->mark != (x))
/*
** "module" operation (size is always a power of 2) */
#define lmod(s,size) ((int)((s) & ((size)-1)))
/*
** informations about a call (for debugging)
*/

4
lstring.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lstring.c,v 1.50 2001/01/11 18:59:20 roberto Exp roberto $
** $Id: lstring.c,v 1.51 2001/01/19 13:20:30 roberto Exp roberto $
** String table (keeps all strings handled by Lua)
** See Copyright Notice in lua.h
*/
@ -15,8 +15,6 @@
#include "lstring.h"
#define lmod(s,size) ((int)((s) & ((size)-1)))
void luaS_init (lua_State *L) {
luaS_resize(L, &G(L)->strt, MINPOWER2);

8
ltable.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltable.c,v 1.68 2001/01/26 13:18:00 roberto Exp roberto $
** $Id: ltable.c,v 1.69 2001/01/26 14:16:35 roberto Exp roberto $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@ -31,9 +31,9 @@
#define TagDefault LUA_TTABLE
#define hashnum(t,n) (&t->node[(luint32)(lint32)(n)&(t->size-1)])
#define hashstr(t,str) (&t->node[(str)->u.s.hash&(t->size-1)])
#define hashpointer(t,p) (&t->node[IntPoint(p)&(t->size-1)])
#define hashnum(t,n) (&t->node[lmod((luint32)(lint32)(n), t->size)])
#define hashstr(t,str) (&t->node[lmod((str)->u.s.hash, t->size)])
#define hashpointer(t,p) (&t->node[lmod(IntPoint(p), t->size)])
/*