aboutsummaryrefslogtreecommitdiff
path: root/lbuiltin.c
diff options
context:
space:
mode:
Diffstat (limited to 'lbuiltin.c')
-rw-r--r--lbuiltin.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/lbuiltin.c b/lbuiltin.c
index ac45f361..6be64092 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbuiltin.c,v 1.113 2000/06/05 20:15:33 roberto Exp roberto $ 2** $Id: lbuiltin.c,v 1.114 2000/06/06 16:31:41 roberto Exp roberto $
3** Built-in functions 3** Built-in functions
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -74,7 +74,7 @@ static Number getnarg (lua_State *L, const Hash *a) {
74 74
75 75
76static Hash *gettable (lua_State *L, int arg) { 76static Hash *gettable (lua_State *L, int arg) {
77 return avalue(luaL_tablearg(L, arg)); 77 return hvalue(luaL_tablearg(L, arg));
78} 78}
79 79
80/* }====================================================== */ 80/* }====================================================== */
@@ -358,14 +358,14 @@ void luaB_tostring (lua_State *L) {
358 lua_pushobject(L, o); 358 lua_pushobject(L, o);
359 return; 359 return;
360 case TAG_TABLE: 360 case TAG_TABLE:
361 sprintf(buff, "table: %p", o->value.a); 361 sprintf(buff, "table: %p", hvalue(o));
362 break; 362 break;
363 case TAG_LCLOSURE: case TAG_CCLOSURE: 363 case TAG_LCLOSURE: case TAG_CCLOSURE:
364 sprintf(buff, "function: %p", o->value.cl); 364 sprintf(buff, "function: %p", clvalue(o));
365 break; 365 break;
366 case TAG_USERDATA: 366 case TAG_USERDATA:
367 sprintf(buff, "userdata: %p(%d)", o->value.ts->u.d.value, 367 sprintf(buff, "userdata: %p(%d)", tsvalue(o)->u.d.value,
368 o->value.ts->u.d.tag); 368 tsvalue(o)->u.d.tag);
369 break; 369 break;
370 case TAG_NIL: 370 case TAG_NIL:
371 lua_pushstring(L, "nil"); 371 lua_pushstring(L, "nil");
@@ -602,7 +602,7 @@ static void deprecated_funcs (lua_State *L) {
602 TObject gt; 602 TObject gt;
603 int i; 603 int i;
604 ttype(&gt) = TAG_TABLE; 604 ttype(&gt) = TAG_TABLE;
605 avalue(&gt) = L->gt; 605 hvalue(&gt) = L->gt;
606 for (i=0; i<num_deprecated; i++) { 606 for (i=0; i<num_deprecated; i++) {
607 lua_pushobject(L, &gt); 607 lua_pushobject(L, &gt);
608 lua_pushcclosure(L, deprecated_global_funcs[i].func, 1); 608 lua_pushcclosure(L, deprecated_global_funcs[i].func, 1);