lua

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

commit c371413530a1bd432f4478e6e21299d7b8b35205
parent d1f220217beadc102a8d44b8e930a92a9f54b001
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Wed, 27 Mar 2002 14:59:51 -0300

small bug if LUA_USERINIT leaves garbage on the stack

Diffstat:
Mlua.c | 5+++--
1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lua.c b/lua.c @@ -1,5 +1,5 @@ /* -** $Id: lua.c,v 1.77 2002/02/14 22:23:43 roberto Exp roberto $ +** $Id: lua.c,v 1.78 2002/02/15 15:15:10 roberto Exp roberto $ ** Lua stand-alone interpreter ** See Copyright Notice in lua.h */ @@ -243,6 +243,7 @@ static int lcall (lua_State *l, const char *name) { static void manual_input (int version) { if (version) print_version(); + lua_settop(L, 0); lua_pushcfunction(L, trap_eof); /* set up handler for incomplete lines */ while (load_string()) { ldo(lcall, NULL, 0); @@ -255,7 +256,7 @@ static void manual_input (int version) { lua_settop(L, 1); /* remove eventual results */ } printf("\n"); - lua_settop(L, 0); /* remove trap_eof */ + lua_pop(L, 1); /* remove trap_eof */ }