| 256 | |
| 257 | |
| 258 | Udata *luaS_newudata (lua_State *L, size_t s, int nuvalue) { |
| 259 | Udata *u; |
| 260 | int i; |
| 261 | GCObject *o; |
| 262 | if (l_unlikely(s > MAX_SIZE - udatamemoffset(nuvalue))) |
| 263 | luaM_toobig(L); |
| 264 | o = luaC_newobj(L, LUA_VUSERDATA, sizeudata(nuvalue, s)); |
| 265 | u = gco2u(o); |
| 266 | u->len = s; |
| 267 | u->nuvalue = nuvalue; |
| 268 | u->metatable = NULL; |
| 269 | for (i = 0; i < nuvalue; i++) |
| 270 | setnilvalue(&u->uv[i].uv); |
| 271 | return u; |
| 272 | } |
| 273 |
no test coverage detected