From 8e9b1e4ae979aec95dcceb0db177367f5e865041 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Tue, 25 Sep 2001 14:08:46 -0300
Subject: details

---
 lua.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lua.c')

diff --git a/lua.c b/lua.c
index 4b6162e0..b1c4cb7b 100644
--- a/lua.c
+++ b/lua.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lua.c,v 1.68 2001/06/11 14:57:17 roberto Exp $
+** $Id: lua.c,v 1.69 2001/08/30 20:54:02 roberto Exp $
 ** Lua stand-alone interpreter
 ** See Copyright Notice in lua.h
 */
@@ -196,7 +196,7 @@ static void manual_input (int version, int prompt) {
       }
       if (firstline && buffer[0] == l_c('=')) {
         buffer[0] = l_c(' ');
-        lua_pushstring(L, l_s("return "));
+        lua_pushstring(L, l_s("return"));
         toprint = 1;
       }
       l = strlen(buffer);
@@ -212,8 +212,8 @@ static void manual_input (int version, int prompt) {
     }
     lua_concat(L, lua_gettop(L));
     ldo(lua_dostring, lua_tostring(L, 1), 0);
-    if (toprint) {
-      lua_remove(L, 1);  /* remove ran string */
+    lua_remove(L, 1);  /* remove ran string */
+    if (toprint && lua_gettop(L) > 0) {  /* any result to print? */
       lua_getglobal(L, l_s("print"));
       lua_insert(L, 1);
       lua_call(L, lua_gettop(L)-1, 0);
-- 
cgit v1.2.3-55-g6feb