Use error-display-handler
instead of threads for multiple error reporting.
Closes PR 13240 (in reality, avoids the bug, but ryanc says that it's too hard to fix).
This commit is contained in:
parent
d11f63bd46
commit
30e26f00cd
|
@ -93,9 +93,9 @@ don't depend on any other portion of the system
|
|||
[l
|
||||
(let ([stxs
|
||||
(for/list ([e l])
|
||||
(sync (thread
|
||||
(lambda ()
|
||||
(raise-typecheck-error (err-msg e) (err-stx e)))))
|
||||
(with-handlers ([exn:fail:syntax?
|
||||
(λ (e) ((error-display-handler) (exn-message e) e))])
|
||||
(raise-typecheck-error (err-msg e) (err-stx e)))
|
||||
(err-stx e))])
|
||||
(reset!)
|
||||
(unless (null? stxs)
|
||||
|
|
Loading…
Reference in New Issue
Block a user