diff options
-rw-r--r-- | lbaselib.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lbaselib.c,v 1.63 2002/04/02 20:42:20 roberto Exp roberto $ | 2 | ** $Id: lbaselib.c,v 1.64 2002/04/05 18:54:31 roberto Exp roberto $ |
3 | ** Basic library | 3 | ** Basic library |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -441,6 +441,7 @@ static void base_open (lua_State *L) { | |||
441 | 441 | ||
442 | static int luaB_resume (lua_State *L) { | 442 | static int luaB_resume (lua_State *L) { |
443 | lua_State *co = (lua_State *)lua_getfrombox(L, lua_upvalueindex(1)); | 443 | lua_State *co = (lua_State *)lua_getfrombox(L, lua_upvalueindex(1)); |
444 | lua_settop(L, 0); | ||
444 | if (lua_resume(L, co) != 0) | 445 | if (lua_resume(L, co) != 0) |
445 | lua_error(L, "error running co-routine"); | 446 | lua_error(L, "error running co-routine"); |
446 | return lua_gettop(L); | 447 | return lua_gettop(L); |