diff --git a/collects/typed-scheme/private/tc-app-unit.ss b/collects/typed-scheme/private/tc-app-unit.ss
index 8bce1a7d1e..664ab54a0a 100644
--- a/collects/typed-scheme/private/tc-app-unit.ss
+++ b/collects/typed-scheme/private/tc-app-unit.ss
@@ -546,7 +546,7 @@
       (identifier? #'or/andmap)
       (or (free-identifier=? #'or/andmap #'ormap)
           (free-identifier=? #'or/andmap #'andmap))
-      (with-handlers (#;[exn:fail? (lambda _ #f)])
+      (with-handlers ([exn:fail? (lambda _ #f)])
         (tc/dots #'arg)
         #t))
      (let-values ([(ty bound) (tc/dots #'arg)])