remove debugging

This commit is contained in:
Matthias Felleisen 2012-03-13 07:19:25 -04:00
parent 366aa2c42d
commit 0df7ef4d73

View File

@ -68,7 +68,6 @@
(let ([o-d-h (error-display-handler)])
(lambda (msg exn)
(define x (get-rewriten-error-message exn))
(displayln `(hello ,x ,exn))
(o-d-h x exn))))
(let ([orig (global-port-print-handler)])
(global-port-print-handler