mbda (type info)
          (drop-into-repl (format *stderr* "caught (+ ~S 1) in ~S~%" x (outlet (curlet))) (curlet)))))

    (f #\a)

which calls the error handler above:

    caught (+ #\a 1) in (inlet 'x #\a)
    break: C-q to exit break
    break&gt; (curlet)
    (inlet 'type wrong-type-arg 'info ("~A ~:D argument, ~S, is ~A but should be ~A" + 1 #\a "a character" "a number"))
    ;; that is the error handler environment

    break&gt; (outlet (curlet))
    (inlet 'x #\a)
    ;; the environment where the