Improve repl

1 files changed, 14 insertions, 3 deletions

@@ -4,6 +4,16 @@ local repl = {}
 local eval = require("eval").eval
 local read = require("read").read
 
+local function schemeprint (x)
+        if x == true then
+                print("#t")
+        elseif x == false then
+                print("#f")
+        else
+                print(x)
+        end
+end
+
 function repl.repl (prompt)
         if not prompt then prompt = "lam> " end
         io.input():setvbuf("line")
@@ -11,9 +21,10 @@ function repl.repl (prompt)
                 io.write(prompt)
                 io.output():flush()
                 local input = io.read()
-                if input == nil then break end
-                local value = eval(read(input))
-                if value then print(value) end
+                if input ~= "" then
+                        local value = eval(read(input))
+                        if value ~= nil then schemeprint(value) end
+                end
         until false
 end