suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Optimization Coach should not catch break exceptions.

Browse Source 
(cherry picked from commit f6feff3c51)
This commit is contained in:
Vincent St-Amour 2012-07-20 11:03:27 -04:00 committed by Ryan Culpepper
parent 29557d55dd
commit 89e06e802f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-racket/optimizer/tool/tool.rkt
View File

@ -18,7 +18,7 @@
;; optimization-coach-callback : drracket:unit:frame<%> -> void ;; optimization-coach-callback : drracket:unit:frame<%> -> void
(define (optimization-coach-callback drr-frame) (define (optimization-coach-callback drr-frame)
(with-handlers (with-handlers
([exn? ([(lambda (e) (and (exn? e) (not (exn:break? e))))
;; typechecking failed, report in the interactions window ;; typechecking failed, report in the interactions window
(lambda (e) (lambda (e)
(define interactions (send drr-frame get-interactions-text)) (define interactions (send drr-frame get-interactions-text))