[Chicken-users] read / write floats

[Gábor Balázs]

Hello,

I tried the following with chicken 2.6:

    (define v1 (/ 1 3))

    (call-with-output-file "try.dat"
                           (lambda (port)

                             (write v1 port)))
                            
    (define v2 (call-with-input-file "try.dat"

                                     (lambda (port)
                                       (read port))))

    (print "v1 = " v1)
    (print "v2 = " v2)

    (print (equal? v1 v2))
    (print (= v1 v2))
    (print (- v1 v2))

And the result was:

    v1 = 0.333333333333333
    v2 = 0.333333333333333
    #f
    #f
    3.33066907387547e-16

Is it a known bug?
I tried to report this, but I did not find the easy way.

`bg`