From ace6c2530e32720fb8b9b8ead5f117c7ed382864 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 6 Dec 2015 14:54:29 -0800 Subject: [PATCH] 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 file changed, 5 insertions(+) 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 @@ (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) -- 2.39.2