|
@@ -1,5 +1,5 @@
|
|
/*
|
|
/*
|
|
-** $Id: lapi.c,v 2.79 2009/06/15 19:51:31 roberto Exp roberto $
|
|
|
|
|
|
+** $Id: lapi.c,v 2.80 2009/06/17 17:52:57 roberto Exp roberto $
|
|
** Lua API
|
|
** Lua API
|
|
** See Copyright Notice in lua.h
|
|
** See Copyright Notice in lua.h
|
|
*/
|
|
*/
|
|
@@ -357,13 +357,6 @@ LUA_API size_t lua_objlen (lua_State *L, int idx) {
|
|
case LUA_TSTRING: return tsvalue(o)->len;
|
|
case LUA_TSTRING: return tsvalue(o)->len;
|
|
case LUA_TUSERDATA: return uvalue(o)->len;
|
|
case LUA_TUSERDATA: return uvalue(o)->len;
|
|
case LUA_TTABLE: return luaH_getn(hvalue(o));
|
|
case LUA_TTABLE: return luaH_getn(hvalue(o));
|
|
- case LUA_TNUMBER: {
|
|
|
|
- size_t l;
|
|
|
|
- lua_lock(L); /* `luaV_tostring' may create a new string */
|
|
|
|
- l = (luaV_tostring(L, o) ? tsvalue(o)->len : 0);
|
|
|
|
- lua_unlock(L);
|
|
|
|
- return l;
|
|
|
|
- }
|
|
|
|
default: return 0;
|
|
default: return 0;
|
|
}
|
|
}
|
|
}
|
|
}
|