diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-12-17 10:28:57 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-12-17 10:28:57 -0200 |
| commit | e0f9d1c8f5cca74d1ad4017a1f14ff1acac2075a (patch) | |
| tree | ae7e07fee8706490585ed02745f051283d179564 /ldo.c | |
| parent | de6fc75d630b393d8b577ba03353abe527523d0f (diff) | |
| download | lua-e0f9d1c8f5cca74d1ad4017a1f14ff1acac2075a.tar.gz lua-e0f9d1c8f5cca74d1ad4017a1f14ff1acac2075a.tar.bz2 lua-e0f9d1c8f5cca74d1ad4017a1f14ff1acac2075a.zip | |
removed export of function only for coco
Diffstat (limited to 'ldo.c')
| -rw-r--r-- | ldo.c | 10 |
1 files changed, 5 insertions, 5 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldo.c,v 2.76 2009/12/10 18:20:07 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 2.77 2009/12/17 12:26:09 roberto Exp roberto $ |
| 3 | ** Stack and Call structure of Lua | 3 | ** Stack and Call structure of Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -81,7 +81,7 @@ struct lua_longjmp { | |||
| 81 | }; | 81 | }; |
| 82 | 82 | ||
| 83 | 83 | ||
| 84 | void luaD_seterrorobj (lua_State *L, int errcode, StkId oldtop) { | 84 | static void seterrorobj (lua_State *L, int errcode, StkId oldtop) { |
| 85 | switch (errcode) { | 85 | switch (errcode) { |
| 86 | case LUA_ERRMEM: { | 86 | case LUA_ERRMEM: { |
| 87 | setsvalue2s(L, oldtop, luaS_newliteral(L, MEMERRMSG)); | 87 | setsvalue2s(L, oldtop, luaS_newliteral(L, MEMERRMSG)); |
| @@ -454,7 +454,7 @@ static int recover (lua_State *L, int status) { | |||
| 454 | /* "finish" luaD_pcall */ | 454 | /* "finish" luaD_pcall */ |
| 455 | oldtop = restorestack(L, ci->u.c.oldtop); | 455 | oldtop = restorestack(L, ci->u.c.oldtop); |
| 456 | luaF_close(L, oldtop); | 456 | luaF_close(L, oldtop); |
| 457 | luaD_seterrorobj(L, status, oldtop); | 457 | seterrorobj(L, status, oldtop); |
| 458 | L->ci = ci; | 458 | L->ci = ci; |
| 459 | L->allowhook = ci->u.c.old_allowhook; | 459 | L->allowhook = ci->u.c.old_allowhook; |
| 460 | L->nny = 0; /* should be zero to be yieldable */ | 460 | L->nny = 0; /* should be zero to be yieldable */ |
| @@ -535,7 +535,7 @@ LUA_API int lua_resume (lua_State *L, int nargs) { | |||
| 535 | status = luaD_rawrunprotected(L, unroll, NULL); /* run continuation */ | 535 | status = luaD_rawrunprotected(L, unroll, NULL); /* run continuation */ |
| 536 | else { /* unrecoverable error */ | 536 | else { /* unrecoverable error */ |
| 537 | L->status = cast_byte(status); /* mark thread as `dead' */ | 537 | L->status = cast_byte(status); /* mark thread as `dead' */ |
| 538 | luaD_seterrorobj(L, status, L->top); | 538 | seterrorobj(L, status, L->top); |
| 539 | L->ci->top = L->top; | 539 | L->ci->top = L->top; |
| 540 | break; | 540 | break; |
| 541 | } | 541 | } |
| @@ -586,7 +586,7 @@ int luaD_pcall (lua_State *L, Pfunc func, void *u, | |||
| 586 | if (status != LUA_OK) { /* an error occurred? */ | 586 | if (status != LUA_OK) { /* an error occurred? */ |
| 587 | StkId oldtop = restorestack(L, old_top); | 587 | StkId oldtop = restorestack(L, old_top); |
| 588 | luaF_close(L, oldtop); /* close possible pending closures */ | 588 | luaF_close(L, oldtop); /* close possible pending closures */ |
| 589 | luaD_seterrorobj(L, status, oldtop); | 589 | seterrorobj(L, status, oldtop); |
| 590 | L->ci = old_ci; | 590 | L->ci = old_ci; |
| 591 | L->allowhook = old_allowhooks; | 591 | L->allowhook = old_allowhooks; |
| 592 | L->nny = old_nny; | 592 | L->nny = old_nny; |