1 files changed, 11 insertions, 2 deletions

@@ -33,8 +33,17 @@ function m.repl (prompt, infile, out)
                 end
                 local x = read.read(inport)
                 if x then
-                        local val = eval.eval(x)
-                        if out ~= false then
+                        local ok, val =
+                                xpcall(
+                                        function () return eval.eval(x) end,
+                                        function (e)
+                                                local start = e:find(": ")
+                                                return e:sub(start+2)
+                                        end
+                                )
+                        if not ok then
+                                print("not ok: " .. val)
+                        elseif out ~= false then
                                 schemeprint(val)
                         end
                 end