aboutsummaryrefslogtreecommitdiffstats
path: root/modules
diff options
context:
space:
mode:
authorPaul Eggert2015-12-06 14:54:29 -0800
committerPaul Eggert2015-12-06 14:55:16 -0800
commitace6c2530e32720fb8b9b8ead5f117c7ed382864 (patch)
treedb3adfea5cd300bbb48e294151ca393b5d559e0f /modules
parent0e574ea35ea75fa91a38718966ffe6c17b8e93d8 (diff)
downloademacs-ace6c2530e32720fb8b9b8ead5f117c7ed382864.tar.gz
emacs-ace6c2530e32720fb8b9b8ead5f117c7ed382864.zip
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.
Diffstat (limited to 'modules')
-rw-r--r--modules/mod-test/test.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/modules/mod-test/test.el b/modules/mod-test/test.el
index c1defae9bd7..69bf933c7f9 100644
--- a/modules/mod-test/test.el
+++ b/modules/mod-test/test.el
@@ -46,6 +46,11 @@
46 (1- most-positive-fixnum))) 46 (1- most-positive-fixnum)))
47 (should (= (mod-test-sum 1 most-negative-fixnum) 47 (should (= (mod-test-sum 1 most-negative-fixnum)
48 (1+ most-negative-fixnum))) 48 (1+ most-negative-fixnum)))
49 (when (< #x1fffffff most-positive-fixnum)
50 (should (= (mod-test-sum 1 #x1fffffff)
51 (1+ #x1fffffff)))
52 (should (= (mod-test-sum -1 #x20000000)
53 #x1fffffff)))
49 (should-error (mod-test-sum 1 most-positive-fixnum) 54 (should-error (mod-test-sum 1 most-positive-fixnum)
50 :type 'overflow-error) 55 :type 'overflow-error)
51 (should-error (mod-test-sum -1 most-negative-fixnum) 56 (should-error (mod-test-sum -1 most-negative-fixnum)