diff --git a/collects/racket/contract/private/misc.rkt b/collects/racket/contract/private/misc.rkt index f8264a602b..afc0d99309 100644 --- a/collects/racket/contract/private/misc.rkt +++ b/collects/racket/contract/private/misc.rkt @@ -859,7 +859,7 @@ (make-parameter/c ctc ctc #f)] [(in-ctc out-ctc) (make-parameter/c (coerce-contract 'parameter/c in-ctc) - (coerce-contract 'parameter-c out-ctc) + (coerce-contract 'parameter/c out-ctc) #t)])) ;; in - negative contract