[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 ace6c25: Port mod-test to 32-bit Emacs --without-
From: |
Paul Eggert |
Subject: |
[Emacs-diffs] emacs-25 ace6c25: Port mod-test to 32-bit Emacs --without-wide-int |
Date: |
Sun, 06 Dec 2015 22:55:21 +0000 |
branch: emacs-25
commit ace6c2530e32720fb8b9b8ead5f117c7ed382864
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>
Port mod-test to 32-bit Emacs --without-wide-int
* modules/mod-test/test.el (mod-test-sum-test):
Bring back the 2**29 tests, but port them to 32-bit Emacs
--without-wide-int.
---
modules/mod-test/test.el | 5 +++++
1 files changed, 5 insertions(+), 0 deletions(-)
diff --git a/modules/mod-test/test.el b/modules/mod-test/test.el
index c1defae..69bf933 100644
--- a/modules/mod-test/test.el
+++ b/modules/mod-test/test.el
@@ -46,6 +46,11 @@
(1- most-positive-fixnum)))
(should (= (mod-test-sum 1 most-negative-fixnum)
(1+ most-negative-fixnum)))
+ (when (< #x1fffffff most-positive-fixnum)
+ (should (= (mod-test-sum 1 #x1fffffff)
+ (1+ #x1fffffff)))
+ (should (= (mod-test-sum -1 #x20000000)
+ #x1fffffff)))
(should-error (mod-test-sum 1 most-positive-fixnum)
:type 'overflow-error)
(should-error (mod-test-sum -1 most-negative-fixnum)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 ace6c25: Port mod-test to 32-bit Emacs --without-wide-int,
Paul Eggert <=