diff --git a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/float-complex.rkt b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/float-complex.rkt index cfa39cec7c..c35866f272 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/float-complex.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/float-complex.rkt @@ -151,7 +151,7 @@ c1:unboxed-float-complex-opt-expr c2:unboxed-float-complex-opt-expr cs:unboxed-float-complex-opt-expr ...) - #:when (or (subtypeof? this-syntax -FloatComplex) (subtypeof? this-syntax -Number)) + #:when (subtypeof? this-syntax -FloatComplex) #:with (real-binding imag-binding) (binding-names) #:do [(log-unboxing-opt "unboxed binary float complex")] #:with (bindings ...) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/tests/float-complex-i.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/tests/float-complex-i.rkt index 8c39a314cc..87beeb0fb0 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/tests/float-complex-i.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/tests/float-complex-i.rkt @@ -1,7 +1,7 @@ #;#; #<