diff --git a/collects/unstable/debug.rkt b/collects/unstable/debug.rkt index b77fdf45d3..c7ab5e30d5 100644 --- a/collects/unstable/debug.rkt +++ b/collects/unstable/debug.rkt @@ -161,7 +161,7 @@ (lambda () (parameterize ([current-debug-depth (add1 depth)]) - (with-handlers ([exn:fail? err]) + (with-handlers ([(lambda _ #t) err]) (call-with-values thunk (match-lambda* [(list v)