guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] GNU Guile branch, master, updated. v2.1.0-83-g3c2fe0a


From: Mark H Weaver
Subject: [Guile-commits] GNU Guile branch, master, updated. v2.1.0-83-g3c2fe0a
Date: Tue, 16 Jul 2013 05:48:42 +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=3c2fe0ac03c1d9a2cf0cf595fb13ce0f73f21563

The branch, master has been updated
       via  3c2fe0ac03c1d9a2cf0cf595fb13ce0f73f21563 (commit)
       via  284859c2f9b7072dd0bc1215d43663bb87858025 (commit)
      from  28d5d2537c0321643c3b511a2195cd491204e7f2 (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 3c2fe0ac03c1d9a2cf0cf595fb13ce0f73f21563
Merge: 28d5d25 284859c
Author: Mark H Weaver <address@hidden>
Date:   Tue Jul 16 01:48:19 2013 -0400

    Merge remote-tracking branch 'origin/stable-2.0'

-----------------------------------------------------------------------

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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]