cast_num
setnvalue(L->top, cast_num(n));
setnvalue(idx, cast_num(k));
r = (r * cast_num(16.0)) + cast_num(luaO_hexavalue(cast_uchar(**s)));
setnvalue(L->top++, cast_num(va_arg(argp, int)));
setnvalue(L->top++, cast_num(va_arg(argp, l_uacNumber)));
if (luai_numeq(cast_num(k), n))
setnvalue(key, cast_num(i+1));
lua_Number nk = cast_num(key);
if (luai_numeq(cast_num(k), n)) /* index is int? */
setnvalue(&k, cast_num(key));
setnvalue(ra, cast_num(luaH_getn(h))); /* else primitive len */
setnvalue(ra, cast_num(tsvalue(rb)->len));