aboutsummaryrefslogtreecommitdiff
path: root/ltests.c
diff options
context:
space:
mode:
Diffstat (limited to 'ltests.c')
-rw-r--r--ltests.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/ltests.c b/ltests.c
index ad7f418c..d98f38f4 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltests.c,v 2.76 2009/10/11 20:02:19 roberto Exp roberto $ 2** $Id: ltests.c,v 2.77 2009/10/23 19:12:19 roberto Exp roberto $
3** Internal Module for Debugging of the Lua Implementation 3** Internal Module for Debugging of the Lua Implementation
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -203,7 +203,7 @@ static int testobjref (global_State *g, GCObject *f, GCObject *t) {
203#define checkobjref(g,f,t) lua_assert(testobjref(g,f,obj2gco(t))) 203#define checkobjref(g,f,t) lua_assert(testobjref(g,f,obj2gco(t)))
204 204
205#define checkvalref(g,f,t) lua_assert(!iscollectable(t) || \ 205#define checkvalref(g,f,t) lua_assert(!iscollectable(t) || \
206 ((ttype(t) == gch((t)->value.gc)->tt) && testobjref(g,f,gcvalue(t)))) 206 ((ttype(t) == gch(gcvalue(t))->tt) && testobjref(g,f,gcvalue(t))))
207 207
208 208
209 209
@@ -513,7 +513,7 @@ static int mem_query (lua_State *L) {
513 513
514 514
515static int settrick (lua_State *L) { 515static int settrick (lua_State *L) {
516 l_Trick = obj_at(L, 1)->value.gc; 516 l_Trick = gcvalue(obj_at(L, 1));
517 return 0; 517 return 0;
518} 518}
519 519