 error occurred

    break&gt; (with-let (outlet (outlet (outlet (curlet)))) (define (f x) (char? x)))
    ;; redefine f in the environment where we originally defined it

    break&gt; (f #\a)
    #t
    ;; C-q here to exit the break repl; we return to the original repl
    ;;   where f has been redefined:

    (procedure-source f)
    (lambda (x) (char? x))

The environment chain is slightly different if you call the code at the top from a file
rather than doing it all in the repl.
-->


<!--
(load "/home