diff options
Diffstat (limited to 'lapi.c')
| -rw-r--r-- | lapi.c | 32 |
1 files changed, 16 insertions, 16 deletions
| @@ -402,25 +402,25 @@ LUA_API void lua_newtable (lua_State *L) { | |||
| 402 | } | 402 | } |
| 403 | 403 | ||
| 404 | 404 | ||
| 405 | LUA_API void lua_geteventtable (lua_State *L, int objindex) { | 405 | LUA_API void lua_getmetatable (lua_State *L, int objindex) { |
| 406 | StkId obj; | 406 | StkId obj; |
| 407 | Table *et; | 407 | Table *mt; |
| 408 | lua_lock(L); | 408 | lua_lock(L); |
| 409 | obj = luaA_indexAcceptable(L, objindex); | 409 | obj = luaA_indexAcceptable(L, objindex); |
| 410 | switch (ttype(obj)) { | 410 | switch (ttype(obj)) { |
| 411 | case LUA_TTABLE: | 411 | case LUA_TTABLE: |
| 412 | et = hvalue(obj)->eventtable; | 412 | mt = hvalue(obj)->metatable; |
| 413 | break; | 413 | break; |
| 414 | case LUA_TUSERDATA: | 414 | case LUA_TUSERDATA: |
| 415 | et = uvalue(obj)->uv.eventtable; | 415 | mt = uvalue(obj)->uv.metatable; |
| 416 | break; | 416 | break; |
| 417 | default: | 417 | default: |
| 418 | et = hvalue(defaultet(L)); | 418 | mt = hvalue(defaultmeta(L)); |
| 419 | } | 419 | } |
| 420 | if (et == hvalue(defaultet(L))) | 420 | if (mt == hvalue(defaultmeta(L))) |
| 421 | setnilvalue(L->top); | 421 | setnilvalue(L->top); |
| 422 | else | 422 | else |
| 423 | sethvalue(L->top, et); | 423 | sethvalue(L->top, mt); |
| 424 | api_incr_top(L); | 424 | api_incr_top(L); |
| 425 | lua_unlock(L); | 425 | lua_unlock(L); |
| 426 | } | 426 | } |
| @@ -488,24 +488,24 @@ LUA_API void lua_setglobals (lua_State *L) { | |||
| 488 | } | 488 | } |
| 489 | 489 | ||
| 490 | 490 | ||
| 491 | LUA_API void lua_seteventtable (lua_State *L, int objindex) { | 491 | LUA_API void lua_setmetatable (lua_State *L, int objindex) { |
| 492 | StkId obj, et; | 492 | StkId obj, mt; |
| 493 | lua_lock(L); | 493 | lua_lock(L); |
| 494 | api_checknelems(L, 1); | 494 | api_checknelems(L, 1); |
| 495 | obj = luaA_indexAcceptable(L, objindex); | 495 | obj = luaA_indexAcceptable(L, objindex); |
| 496 | et = --L->top; | 496 | mt = --L->top; |
| 497 | if (ttype(et) == LUA_TNIL) | 497 | if (ttype(mt) == LUA_TNIL) |
| 498 | et = defaultet(L); | 498 | mt = defaultmeta(L); |
| 499 | api_check(L, ttype(et) == LUA_TTABLE); | 499 | api_check(L, ttype(mt) == LUA_TTABLE); |
| 500 | switch (ttype(obj)) { | 500 | switch (ttype(obj)) { |
| 501 | case LUA_TTABLE: | 501 | case LUA_TTABLE: |
| 502 | hvalue(obj)->eventtable = hvalue(et); | 502 | hvalue(obj)->metatable = hvalue(mt); |
| 503 | break; | 503 | break; |
| 504 | case LUA_TUSERDATA: | 504 | case LUA_TUSERDATA: |
| 505 | uvalue(obj)->uv.eventtable = hvalue(et); | 505 | uvalue(obj)->uv.metatable = hvalue(mt); |
| 506 | break; | 506 | break; |
| 507 | default: | 507 | default: |
| 508 | luaO_verror(L, "cannot change the event table of a %.20s", | 508 | luaO_verror(L, "cannot change the meta table of a %.20s", |
| 509 | luaT_typenames[ttype(obj)]); | 509 | luaT_typenames[ttype(obj)]); |
| 510 | } | 510 | } |
| 511 | lua_unlock(L); | 511 | lua_unlock(L); |
