luaH_getn
case LUA_TTABLE: return luaH_getn(hvalue(o));
LUAI_FUNC int luaH_getn (Table *t);
setnvalue(ra, cast_num(luaH_getn(h))); /* else primitive len */