lua

A copy of the Lua development repository
Log | Files | Refs | README

commit dfaf8c5291fa8aef5bedbfa375853475364ac76e
parent 657f65211a5d836899d29b0a020a9ea4dff8cf51
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Tue, 27 Nov 2001 18:56:25 -0200

details

Diffstat:
Mldo.c | 5++---
Mlua.c | 4++--
2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/ldo.c b/ldo.c @@ -1,5 +1,5 @@ /* -** $Id: ldo.c,v 1.142 2001/10/02 16:45:03 roberto Exp $ +** $Id: ldo.c,v 1.143 2001/10/17 21:12:57 roberto Exp $ ** Stack and Call structure of Lua ** See Copyright Notice in lua.h */ @@ -219,7 +219,6 @@ static void f_parser (lua_State *L, void *ud) { luaF_LConlist(L, cl); setclvalue(L->top, cl); incr_top; - } @@ -287,7 +286,7 @@ LUA_API int lua_loadbuffer (lua_State *L, const l_char *buff, size_t size, /* ** {====================================================== -** Error-recover functions (based on long jumps) +** Error-recovery functions (based on long jumps) ** ======================================================= */ diff --git a/lua.c b/lua.c @@ -1,5 +1,5 @@ /* -** $Id: lua.c,v 1.70 2001/09/25 17:06:34 roberto Exp $ +** $Id: lua.c,v 1.71 2001/10/17 21:12:57 roberto Exp $ ** Lua stand-alone interpreter ** See Copyright Notice in lua.h */ @@ -81,9 +81,9 @@ static int ldo (int (*f)(lua_State *l, const l_char *), const l_char *name, handler h = lreset(); int top = lua_gettop(L); res = f(L, name); /* dostring | dofile */ + signal(SIGINT, h); /* restore old action */ if (clear) lua_settop(L, top); /* remove eventual results */ - signal(SIGINT, h); /* restore old action */ /* Lua gives no message in such cases, so lua.c provides one */ if (res == LUA_ERRMEM) { fprintf(stderr, LUA_PROGNAME l_s("memory allocation error\n"));