diff options
Diffstat (limited to 'ltablib.c')
-rw-r--r-- | ltablib.c | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltablib.c,v 1.47 2009/06/17 17:53:50 roberto Exp roberto $ | 2 | ** $Id: ltablib.c,v 1.48 2009/11/24 12:05:44 roberto Exp roberto $ |
3 | ** Library for Table Manipulation | 3 | ** Library for Table Manipulation |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -63,6 +63,7 @@ static int foreach (lua_State *L) { | |||
63 | } | 63 | } |
64 | 64 | ||
65 | 65 | ||
66 | #if defined(LUA_COMPAT_MAXN) | ||
66 | static int maxn (lua_State *L) { | 67 | static int maxn (lua_State *L) { |
67 | lua_Number max = 0; | 68 | lua_Number max = 0; |
68 | luaL_checktype(L, 1, LUA_TTABLE); | 69 | luaL_checktype(L, 1, LUA_TTABLE); |
@@ -77,7 +78,11 @@ static int maxn (lua_State *L) { | |||
77 | lua_pushnumber(L, max); | 78 | lua_pushnumber(L, max); |
78 | return 1; | 79 | return 1; |
79 | } | 80 | } |
80 | 81 | #else | |
82 | static int maxn (lua_State *L) { | ||
83 | return luaL_error(L, "function 'maxn' is deprecated"); | ||
84 | } | ||
85 | #endif | ||
81 | 86 | ||
82 | static int getn (lua_State *L) { | 87 | static int getn (lua_State *L) { |
83 | lua_pushinteger(L, aux_getn(L, 1)); | 88 | lua_pushinteger(L, aux_getn(L, 1)); |