From e942bb1c3a8ede379ff8ea5032a5cc5855f279c1 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 25 Nov 2011 17:54:56 -0600 Subject: [PATCH] add another printf for drdr's consumption --- collects/framework/private/color.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/collects/framework/private/color.rkt b/collects/framework/private/color.rkt index 775e05087c..c1b6007048 100644 --- a/collects/framework/private/color.rkt +++ b/collects/framework/private/color.rkt @@ -470,6 +470,8 @@ added get-regions (with-handlers ((exn:fail? (λ (exn) (parameterize ((print-struct #t)) + (when (getenv "PLTDRDRTEST") + (printf "colorer-driver: error ~a\n" (and (exn? exn) (exn-message exn)))) ((error-display-handler) (format "exception in colorer thread: ~s" exn) exn))