GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-01-14 05:43:00 +08:00
Code Issues Projects Releases Wiki Activity

details.

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2001-11-06 19:41:43 -02:00
parent 617008f552
commit fd48dcc7c8
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ltests.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltests.c,v 1.94 2001/10/25 19:14:14 roberto Exp $
** $Id: ltests.c,v 1.95 2001/10/26 17:33:30 roberto Exp $
** Internal Module for Debugging of the Lua Implementation
** See Copyright Notice in lua.h
*/
@ -312,9 +312,10 @@ static int string_query (lua_State *L) {
static int tref (lua_State *L) {
int level = lua_gettop(L);
int lock = luaL_opt_int(L, 2, 1);
luaL_check_any(L, 1);
lua_pushvalue(L, 1);
lua_pushnumber(L, lua_ref(L, 1));
lua_pushnumber(L, lua_ref(L, lock));
assert(lua_gettop(L) == level+1); /* +1 for result */
return 1;
}