Filesystem errors are not internal typed racket errors.
This commit is contained in:
parent
eb38783750
commit
adb6b79620
|
@ -38,7 +38,7 @@
|
|||
(set-box! typed-context? #t)
|
||||
;(start-timing (syntax-property stx 'enclosing-module-name))
|
||||
(with-handlers
|
||||
([(λ (e) (and (exn:fail? e) (not (exn:fail:syntax? e))))
|
||||
([(λ (e) (and (exn:fail? e) (not (exn:fail:syntax? e)) (not (exn:fail:filesystem? e))))
|
||||
(λ (e) (tc-error "Internal Typed Racket Error : ~a" e))])
|
||||
(parameterize (;; enable fancy printing?
|
||||
[custom-printer #t]
|
||||
|
|
Loading…
Reference in New Issue
Block a user