diff options
| author | Paul Eggert | 2015-12-06 14:54:29 -0800 |
|---|---|---|
| committer | Paul Eggert | 2015-12-06 14:55:16 -0800 |
| commit | ace6c2530e32720fb8b9b8ead5f117c7ed382864 (patch) | |
| tree | db3adfea5cd300bbb48e294151ca393b5d559e0f /modules | |
| parent | 0e574ea35ea75fa91a38718966ffe6c17b8e93d8 (diff) | |
| download | emacs-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.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 @@ | |||
| 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) |