From f6feff3c51032f6ae0020e2f66ae0291ec3ca1bd Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 20 Jul 2012 11:03:27 -0400 Subject: [PATCH] Optimization Coach should not catch break exceptions. --- collects/typed-racket/optimizer/tool/tool.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-racket/optimizer/tool/tool.rkt b/collects/typed-racket/optimizer/tool/tool.rkt index 267199e5d5..dfb1a242d0 100644 --- a/collects/typed-racket/optimizer/tool/tool.rkt +++ b/collects/typed-racket/optimizer/tool/tool.rkt @@ -18,7 +18,7 @@ ;; optimization-coach-callback : drracket:unit:frame<%> -> void (define (optimization-coach-callback drr-frame) (with-handlers - ([exn? + ([(lambda (e) (and (exn? e) (not (exn:break? e)))) ;; typechecking failed, report in the interactions window (lambda (e) (define interactions (send drr-frame get-interactions-text))