diff options
Diffstat (limited to 'ltests.c')
-rw-r--r-- | ltests.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 1.167 2003/10/20 12:25:23 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.168 2003/11/05 11:59:14 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 | */ |
@@ -354,21 +354,21 @@ static int tref (lua_State *L) { | |||
354 | luaL_checkany(L, 1); | 354 | luaL_checkany(L, 1); |
355 | lua_pushvalue(L, 1); | 355 | lua_pushvalue(L, 1); |
356 | lua_pushinteger(L, lua_ref(L, lock)); | 356 | lua_pushinteger(L, lua_ref(L, lock)); |
357 | assert(lua_gettop(L) == level+1); /* +1 for result */ | 357 | lua_assert(lua_gettop(L) == level+1); /* +1 for result */ |
358 | return 1; | 358 | return 1; |
359 | } | 359 | } |
360 | 360 | ||
361 | static int getref (lua_State *L) { | 361 | static int getref (lua_State *L) { |
362 | int level = lua_gettop(L); | 362 | int level = lua_gettop(L); |
363 | lua_getref(L, luaL_checkint(L, 1)); | 363 | lua_getref(L, luaL_checkint(L, 1)); |
364 | assert(lua_gettop(L) == level+1); | 364 | lua_assert(lua_gettop(L) == level+1); |
365 | return 1; | 365 | return 1; |
366 | } | 366 | } |
367 | 367 | ||
368 | static int unref (lua_State *L) { | 368 | static int unref (lua_State *L) { |
369 | int level = lua_gettop(L); | 369 | int level = lua_gettop(L); |
370 | lua_unref(L, luaL_checkint(L, 1)); | 370 | lua_unref(L, luaL_checkint(L, 1)); |
371 | assert(lua_gettop(L) == level); | 371 | lua_assert(lua_gettop(L) == level); |
372 | return 0; | 372 | return 0; |
373 | } | 373 | } |
374 | 374 | ||