about summary refs log tree commit diff
path: root/src/bin/main.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/bin/main.ml')
-rw-r--r--src/bin/main.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bin/main.ml b/src/bin/main.ml
index 1c466ea..e1be039 100644
--- a/src/bin/main.ml
+++ b/src/bin/main.ml
@@ -11,7 +11,7 @@ let ep input =
 let rec repl () =
   match LNoise.linenoise "toytt> " with
   | Some input -> 
-    Error.run ~emit:Term.display ~fatal:Term.display (fun () -> ep input);
+    Error.run ~emit:(Term.display ~show_backtrace:false) ~fatal:(Term.display ~show_backtrace:false) (fun () -> ep input);
     let _ = LNoise.history_add input in
     repl ()
   | None -> repl ()