From 2b2d8ecd7aba6cc7604532c53372db01a30618d3 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Tue, 8 Jun 2004 11:31:15 -0300
Subject: details

---
 lstrlib.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lstrlib.c b/lstrlib.c
index 815b530c..502ea814 100644
--- a/lstrlib.c
+++ b/lstrlib.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lstrlib.c,v 1.101 2004/01/02 11:54:14 roberto Exp roberto $
+** $Id: lstrlib.c,v 1.102 2004/04/30 20:13:38 roberto Exp roberto $
 ** Standard library for string operations and pattern-matching
 ** See Copyright Notice in lua.h
 */
@@ -140,6 +140,7 @@ static int writer (lua_State *L, const void* b, size_t size, void* B) {
 static int str_dump (lua_State *L) {
   luaL_Buffer b;
   luaL_checktype(L, 1, LUA_TFUNCTION);
+  lua_settop(L, 1);
   luaL_buffinit(L,&b);
   if (!lua_dump(L, writer, &b))
     luaL_error(L, "unable to dump given function");
-- 
cgit v1.2.3-55-g6feb