From 4a078e36d90e2f9ba2a7696c75dd08e47fa52ce2 Mon Sep 17 00:00:00 2001 From: Asumu Takikawa Date: Sat, 1 Mar 2014 12:39:28 -0500 Subject: [PATCH] One more #:literal-sets Missed this in 07bde5063b5a3a83f61e85f00a1c6ce6e0a097d2 --- .../typed-racket-lib/typed-racket/optimizer/float-complex.rkt | 1 + 1 file changed, 1 insertion(+) 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 570290e1eb..276179742f 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 @@ -136,6 +136,7 @@ (define-syntax-class unboxed-float-complex-opt-expr #:commit #:attributes (real-binding imag-binding (bindings 1)) + #:literal-sets (kernel-literals) ;; We let racket's optimizer handle optimization of 0.0s (pattern (#%plain-app op:+^ (~between cs:unboxed-float-complex-opt-expr 2 +inf.0) ...)