diff --git a/collects/typed-racket/utils/any-wrap.rkt b/collects/typed-racket/utils/any-wrap.rkt index 4699ad75bb..fcac9b5334 100644 --- a/collects/typed-racket/utils/any-wrap.rkt +++ b/collects/typed-racket/utils/any-wrap.rkt @@ -1,6 +1,6 @@ #lang racket/base -(require racket/match racket/contract/base racket/contract/combinator racket/flonum racket/fixnum) +(require racket/match racket/contract/base racket/contract/combinator) (define undef (letrec ([x x]) x)) @@ -44,8 +44,7 @@ [(? (lambda (e) (or (number? e) (string? e) (char? e) (symbol? e) (null? e) (regexp? e) (eq? undef e) (path? e) - (flvector? e) (flvector? e) (regexp? e) - (keyword? e) (bytes? e) (boolean? e) (void? e)))) + (regexp? e) (keyword? e) (bytes? e) (boolean? e) (void? e)))) v] [(cons x y) (cons (t x) (t y))] [(? vector? (? immutable?))