diff options
-rw-r--r-- | ltests.c | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 2.171 2014/06/10 17:41:38 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.172 2014/06/17 17:13:29 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 | */ |
@@ -207,8 +207,10 @@ static int testobjref (global_State *g, GCObject *f, GCObject *t) { | |||
207 | return r1; | 207 | return r1; |
208 | } | 208 | } |
209 | 209 | ||
210 | #define checkobjref(g,f,t) \ | 210 | #define checkobjref(g,f,t) checkobjref_(g,f,obj2gco(t)) |
211 | lua_assert((t) == NULL || testobjref(g,f,obj2gco(t))) | 211 | static void checkobjref_ (global_State *g, GCObject *f, GCObject *t) { |
212 | lua_assert((t) == NULL || testobjref(g,f,obj2gco(t))); | ||
213 | } | ||
212 | 214 | ||
213 | 215 | ||
214 | static void checkvalref (global_State *g, GCObject *f, const TValue *t) { | 216 | static void checkvalref (global_State *g, GCObject *f, const TValue *t) { |