Unstaged changes (1)
modified   module/ice-9/boot-9.scm
@@ -1887,6 +1887,10 @@ non-locally, that exit determines the continuation."
              (_ (default-printer)))
            args))

+  (define (unbound-variable-printer . args)
+    (apply scm-error-printer args)
+    ...magic-and-pixie-dust-here...)
+
   (define (syntax-error-printer port key args default-printer)
     (apply (case-lambda
              ((who what where form subform . extra)
@@ -1931,7 +1935,7 @@ non-locally, that exit determines the continuation."
   (set-exception-printer! 'stack-overflow scm-error-printer)
   (set-exception-printer! 'system-error scm-error-printer)
   (set-exception-printer! 'try-again scm-error-printer)
-  (set-exception-printer! 'unbound-variable scm-error-printer)
+  (set-exception-printer! 'unbound-variable unbound-variable-printer)
   (set-exception-printer! 'wrong-number-of-args scm-error-printer)
   (set-exception-printer! 'wrong-type-arg scm-error-printer)