This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "GNU Guile".
http://git.savannah.gnu.org/cgit/guile.git/commit/?id=284859c2f9b7072dd0bc1215d43663bb87858025 The branch, stable-2.0 has been updated via 284859c2f9b7072dd0bc1215d43663bb87858025 (commit) from 95ed221785f5b1203e998823455f682c1830498b (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 284859c2f9b7072dd0bc1215d43663bb87858025 Author: Mark H Weaver <[email protected]> Date: Tue Jul 16 01:46:05 2013 -0400 numbers.test: Fix inum/flonum comparison test on 32-bit machines. * test-suite/tests/numbers.test (<): Fix inum/flonum test. ----------------------------------------------------------------------- Summary of changes: test-suite/tests/numbers.test | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/test-suite/tests/numbers.test b/test-suite/tests/numbers.test index 5e95ab9..ab0880d 100644 --- a/test-suite/tests/numbers.test +++ b/test-suite/tests/numbers.test @@ -2496,8 +2496,8 @@ ;; Prior to guile 2.0.10, we would unconditionally convert the inum ;; to a double, which on a 64-bit system could result in a ;; significant change in its value, thus corrupting the comparison. - (pass-if (< most-positive-fixnum (exact->inexact most-positive-fixnum))) - (pass-if (< (exact->inexact (- most-positive-fixnum)) (- most-positive-fixnum)))) + (pass-if (< most-positive-fixnum (exact->inexact (+ 1 most-positive-fixnum)))) + (pass-if (< (exact->inexact (- (+ 1 most-positive-fixnum))) (- most-positive-fixnum)))) (with-test-prefix "flonum/frac" (pass-if (< 0.75 4/3)) hooks/post-receive -- GNU Guile
