diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-27 15:33:22 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-27 15:33:22 -0200 |
commit | acdb0b741e31adebfa4f608f8bf23e65fa68d741 (patch) | |
tree | a4f3bb695c4b2ae03ef8e02d15953bc12de25a9d /ldo.c | |
parent | 5b08fcd5a1392a7440cae91e68f350a44b136806 (diff) | |
download | lua-acdb0b741e31adebfa4f608f8bf23e65fa68d741.tar.gz lua-acdb0b741e31adebfa4f608f8bf23e65fa68d741.tar.bz2 lua-acdb0b741e31adebfa4f608f8bf23e65fa68d741.zip |
comments.
Diffstat (limited to 'ldo.c')
-rw-r--r-- | ldo.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldo.c,v 1.59 1999/12/21 18:04:41 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.60 1999/12/23 18:19:57 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 | */ |
@@ -56,7 +56,7 @@ void luaD_checkstack (lua_State *L, int n) { | |||
56 | else { | 56 | else { |
57 | L->stack_last += EXTRA_STACK; /* to be used by error message */ | 57 | L->stack_last += EXTRA_STACK; /* to be used by error message */ |
58 | if (lua_stackedfunction(L, L->stacksize/SLOTS_PER_F) == LUA_NOOBJECT) { | 58 | if (lua_stackedfunction(L, L->stacksize/SLOTS_PER_F) == LUA_NOOBJECT) { |
59 | /* too few funcs on stack: doesn't look like a rec. loop */ | 59 | /* too few funcs on stack: doesn't look like a recursion loop */ |
60 | lua_error(L, "Lua2C - C2Lua overflow"); | 60 | lua_error(L, "Lua2C - C2Lua overflow"); |
61 | } | 61 | } |
62 | else | 62 | else |
@@ -253,14 +253,14 @@ static void message (lua_State *L, const char *s) { | |||
253 | } | 253 | } |
254 | 254 | ||
255 | /* | 255 | /* |
256 | ** Reports an error, and jumps up to the available recover label | 256 | ** Reports an error, and jumps up to the available recovery label |
257 | */ | 257 | */ |
258 | void lua_error (lua_State *L, const char *s) { | 258 | void lua_error (lua_State *L, const char *s) { |
259 | if (s) message(L, s); | 259 | if (s) message(L, s); |
260 | if (L->errorJmp) | 260 | if (L->errorJmp) |
261 | longjmp(L->errorJmp->b, 1); | 261 | longjmp(L->errorJmp->b, 1); |
262 | else { | 262 | else { |
263 | message(L, "exit(1). Unable to recover.\n"); | 263 | message(L, "unable to recover. exiting.\n"); |
264 | exit(1); | 264 | exit(1); |
265 | } | 265 | } |
266 | } | 266 | } |