aboutsummaryrefslogtreecommitdiff
path: root/lbaselib.c
diff options
context:
space:
mode:
Diffstat (limited to 'lbaselib.c')
-rw-r--r--lbaselib.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lbaselib.c b/lbaselib.c
index 226c7a4b..8753273a 100644
--- a/lbaselib.c
+++ b/lbaselib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbaselib.c,v 1.103 2002/10/25 21:36:54 roberto Exp roberto $ 2** $Id: lbaselib.c,v 1.104 2002/11/06 19:08:00 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*/
@@ -561,17 +561,17 @@ static int auxresume (lua_State *L, lua_State *co, int narg) {
561 int status; 561 int status;
562 if (!lua_checkstack(co, narg)) 562 if (!lua_checkstack(co, narg))
563 luaL_error(L, "too many arguments to resume"); 563 luaL_error(L, "too many arguments to resume");
564 lua_movethread(L, co, narg); 564 lua_xmove(L, co, narg);
565 status = lua_resume(co, narg); 565 status = lua_resume(co, narg);
566 if (status == 0) { 566 if (status == 0) {
567 int nres = lua_gettop(co); 567 int nres = lua_gettop(co);
568 if (!lua_checkstack(L, narg)) 568 if (!lua_checkstack(L, narg))
569 luaL_error(L, "too many results to resume"); 569 luaL_error(L, "too many results to resume");
570 lua_movethread(co, L, nres); /* move yielded values */ 570 lua_xmove(co, L, nres); /* move yielded values */
571 return nres; 571 return nres;
572 } 572 }
573 else { 573 else {
574 lua_movethread(co, L, 1); /* move error message */ 574 lua_xmove(co, L, 1); /* move error message */
575 return -1; /* error flag */ 575 return -1; /* error flag */
576 } 576 }
577} 577}
@@ -608,7 +608,7 @@ static int luaB_cocreate (lua_State *L) {
608 luaL_arg_check(L, lua_isfunction(L, 1) && !lua_iscfunction(L, 1), 1, 608 luaL_arg_check(L, lua_isfunction(L, 1) && !lua_iscfunction(L, 1), 1,
609 "Lua function expected"); 609 "Lua function expected");
610 lua_pushvalue(L, 1); /* move function to top */ 610 lua_pushvalue(L, 1); /* move function to top */
611 lua_movethread(L, NL, 1); /* move function from L to NL */ 611 lua_xmove(L, NL, 1); /* move function from L to NL */
612 return 1; 612 return 1;
613} 613}
614 614