[Chicken-janitors] #565: EQV? doesn't distinguish between 0.0 and -0.0

[Chicken Trac]

#565: EQV? doesn't distinguish between 0.0 and -0.0
------------------------+---------------------------------------------------
 Reporter:  johnwcowan  |       Owner:       
     Type:  defect      |      Status:  new  
 Priority:  major       |   Milestone:  4.7.0
Component:  unknown     |     Version:  4.6.x
 Keywords:              |  
------------------------+---------------------------------------------------
 CHICKEN
 (c)2008-2011 The Chicken Team
 (c)2000-2007 Felix L. Winkelmann
 Version 4.6.7
 linux-unix-gnu-x86 [ manyargs dload ptables ]
 compiled 2011-04-15 on pubuntu (Linux)

 #;1> (define pz (* 1.0 0.0))
 #;2> pz
 0.0
 #;3> (define nz (* -1.0 0.0))
 #;4> nz
 -0.0
 #;5> (eqv? pz nz)
 #t


 That shouldn't happen.  When this is fixed, make sure that (= nz pz) still
 returns #t.

-- 
Ticket URL: <http://bugs.call-cc.org/ticket/565>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.