diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/effects-concept.lisp | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/examples/effects-concept.lisp b/examples/effects-concept.lisp index efca43e..0bde72f 100644 --- a/examples/effects-concept.lisp +++ b/examples/effects-concept.lisp @@ -11,9 +11,8 @@ "prompted" (batch [ (do print-line (fmt "You entered: %%" [s])) (prompt-input)]) - (batch [ - (do fatal-error (fmt "error: unknown signal %%" [msg]))])))) + (do fatal-error (fmt "error: unknown signal %%" [msg]))))) -;; ENTRYPOINT +; ENTRYPOINT (prompt-input) |