diff --git a/collects/racket/contract/private/guts.rkt b/collects/racket/contract/private/guts.rkt
index 28b2b010fa..504467c67e 100644
--- a/collects/racket/contract/private/guts.rkt
+++ b/collects/racket/contract/private/guts.rkt
@@ -68,7 +68,7 @@
 
 (define (contract-first-order c)
   (contract-struct-first-order
-   (coerce-contract 'contract-first-order-passes? c)))
+   (coerce-contract 'contract-first-order c)))
 
 (define (contract-first-order-passes? c v)
   ((contract-struct-first-order