diff options
Diffstat (limited to 'modules')
-rw-r--r-- | 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 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) |