[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.9-27-g284859
From: |
Mark H Weaver |
Subject: |
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.9-27-g284859c |
Date: |
Tue, 16 Jul 2013 05:48:07 +0000 |
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 <address@hidden>
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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.9-27-g284859c,
Mark H Weaver <=