diff options
| author | Tom Tromey | 2018-08-08 17:34:42 -0600 |
|---|---|---|
| committer | Tom Tromey | 2018-08-08 17:34:42 -0600 |
| commit | 90dba077cff06b4f2566acb028286fbffa57f22f (patch) | |
| tree | 1bcae9904df3f85310a1a4cbb739232b6bf8c219 | |
| parent | 5ebf062ebe0ec0536efd4f1fb4f37d75f892664b (diff) | |
| download | emacs-90dba077cff06b4f2566acb028286fbffa57f22f.tar.gz emacs-90dba077cff06b4f2566acb028286fbffa57f22f.zip | |
Fix mod-test-sum-test for bignums
* test/src/emacs-module-tests.el (mod-test-sum-test): Update
for bignums.
| -rw-r--r-- | test/src/emacs-module-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/src/emacs-module-tests.el b/test/src/emacs-module-tests.el index 9ef5a47b159..90cd37a98a5 100644 --- a/test/src/emacs-module-tests.el +++ b/test/src/emacs-module-tests.el | |||
| @@ -68,10 +68,10 @@ | |||
| 68 | (1+ #x1fffffff))) | 68 | (1+ #x1fffffff))) |
| 69 | (should (= (mod-test-sum -1 (1+ #x1fffffff)) | 69 | (should (= (mod-test-sum -1 (1+ #x1fffffff)) |
| 70 | #x1fffffff))) | 70 | #x1fffffff))) |
| 71 | (should-error (mod-test-sum 1 most-positive-fixnum) | 71 | (should (= (mod-test-sum 1 most-positive-fixnum) |
| 72 | :type 'overflow-error) | 72 | (1+ most-positive-fixnum))) |
| 73 | (should-error (mod-test-sum -1 most-negative-fixnum) | 73 | (should (= (mod-test-sum -1 most-negative-fixnum) |
| 74 | :type 'overflow-error)) | 74 | (1- most-negative-fixnum)))) |
| 75 | 75 | ||
| 76 | (ert-deftest mod-test-sum-docstring () | 76 | (ert-deftest mod-test-sum-docstring () |
| 77 | (should (string= (documentation 'mod-test-sum) "Return A + B\n\n(fn a b)"))) | 77 | (should (string= (documentation 'mod-test-sum) "Return A + B\n\n(fn a b)"))) |