aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2002-01-30 15:26:44 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2002-01-30 15:26:44 -0200
commitd6fd33e76fdeb919fd91860aa9d0f9524e6d415a (patch)
treef2347c99a8d57564b22e622d405f5c3d03061982 /lapi.c
parent50e29525936be4891f9db090f293432913b5f7c0 (diff)
downloadlua-d6fd33e76fdeb919fd91860aa9d0f9524e6d415a.tar.gz
lua-d6fd33e76fdeb919fd91860aa9d0f9524e6d415a.tar.bz2
lua-d6fd33e76fdeb919fd91860aa9d0f9524e6d415a.zip
`eventtable' renamed to `metatable'
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c32
1 files changed, 16 insertions, 16 deletions
diff --git a/lapi.c b/lapi.c
index 94511e3d..293d09e3 100644
--- a/lapi.c
+++ b/lapi.c
@@ -402,25 +402,25 @@ LUA_API void lua_newtable (lua_State *L) {
402} 402}
403 403
404 404
405LUA_API void lua_geteventtable (lua_State *L, int objindex) { 405LUA_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
491LUA_API void lua_seteventtable (lua_State *L, int objindex) { 491LUA_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);