search

larcenists / larceny

Larceny Scheme implementation
Other
202 stars 32 forks source link

bug in bytevector-ieee-single-native-set! #786

Closed WillClinger closed 7 years ago

WillClinger commented 7 years ago

This shouldn't happen:

> (let ((x 2.9802322e-8)
        (bv (make-bytevector 4)))
    (bytevector-ieee-single-native-set! bv 0 x)
    (bytevector-ieee-single-native-ref bv 0))
(bytevector-u8-set! #vu8(0 0 0 50) 2 256)
[rtsdebug]
WillClinger commented 7 years ago

Fixed by changeset 66a054474d6379b8c750f70d75cc865af7c4a9ae