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.
This commit is contained in:
Paul Eggert 2015-12-06 14:54:29 -08:00
parent 0e574ea35e
commit ace6c2530e

View file

@ -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)