Fix i386 code generated for flonum rounding primitives.
authorTaylor R Campbell <campbell@mumble.net>
Fri, 6 Aug 2010 01:36:09 +0000 (01:36 +0000)
committerTaylor R Campbell <campbell@mumble.net>
Fri, 6 Aug 2010 01:36:09 +0000 (01:36 +0000)
commit7fdd72673d112d3f0ee5b7b966629a67a8a11f37
tree2ee8a4cc5bab7f1a130587c828c2034ef3c6b7ae
parente28c5496ebba30194cf110a5157e62e57af34406
Fix i386 code generated for flonum rounding primitives.

The default has not been round-to-even since primitives were added to
change it, but the generated code assumed it was.

Remember to run at least a two-stage build so that the runtime is
compiled with the new compiler.

Before:

(flo:with-rounding-mode 'TOWARD-ZERO (lambda () (flo:ceiling 1.2)))
;Value: 1.

After:

(flo:with-rounding-mode 'TOWARD-ZERO (lambda () (flo:ceiling 1.2)))
;Value: 2.
src/compiler/machines/i386/rulflo.scm