Fix coercions from single-floats to floats.
Found using random testing. original commit: ca63915693b706f0ead17f114ffe76a087a11c63
This commit is contained in:
parent
82f1f48ad2
commit
6584c83187
|
@ -79,7 +79,7 @@
|
|||
;; of the exact 0 problem, but since float-opt-expr checks whether the
|
||||
;; surrounding expressing is of type Float and not just Real, this is safe
|
||||
(pattern e:real-expr
|
||||
#:with opt #'(exact->inexact e)))
|
||||
#:with opt #'(real->double-flonum e)))
|
||||
|
||||
(define (log-float-real-missed-opt stx irritants)
|
||||
(log-missed-optimization
|
||||
|
|
Loading…
Reference in New Issue
Block a user