aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--app/app.lisp6
1 files changed, 5 insertions, 1 deletions
diff --git a/app/app.lisp b/app/app.lisp
index 0ed0b45..dff5dcb 100644
--- a/app/app.lisp
+++ b/app/app.lisp
@@ -53,5 +53,9 @@
:sub-commands (toplevel/subcommands)))
(defun main ()
- (cli:run (toplevel/command)))
+ (ol::with-local-state
+ (handler-case
+ (cli:run (toplevel/command)))
+ (error (e)
+ (format t "unhandled error ~e~%" e))))