diff options
Diffstat (limited to 'lobject.c')
| -rw-r--r-- | lobject.c | 12 |
1 files changed, 1 insertions, 11 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lobject.c,v 1.63 2001/01/29 19:34:02 roberto Exp roberto $ | 2 | ** $Id: lobject.c,v 1.64 2001/02/02 15:13:05 roberto Exp roberto $ |
| 3 | ** Some generic functions over Lua objects | 3 | ** Some generic functions over Lua objects |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -22,16 +22,6 @@ | |||
| 22 | const TObject luaO_nilobject = {LUA_TNIL, {NULL}}; | 22 | const TObject luaO_nilobject = {LUA_TNIL, {NULL}}; |
| 23 | 23 | ||
| 24 | 24 | ||
| 25 | /* | ||
| 26 | ** returns smaller power of 2 larger than `n' (minimum is MINPOWER2) | ||
| 27 | */ | ||
| 28 | luint32 luaO_power2 (luint32 n) { | ||
| 29 | luint32 p = MINPOWER2; | ||
| 30 | while (p<=n) p<<=1; | ||
| 31 | return p; | ||
| 32 | } | ||
| 33 | |||
| 34 | |||
| 35 | int luaO_equalObj (const TObject *t1, const TObject *t2) { | 25 | int luaO_equalObj (const TObject *t1, const TObject *t2) { |
| 36 | if (ttype(t1) != ttype(t2)) return 0; | 26 | if (ttype(t1) != ttype(t2)) return 0; |
| 37 | switch (ttype(t1)) { | 27 | switch (ttype(t1)) { |
