Fix mod-test-sum-test for bignums

* test/src/emacs-module-tests.el (mod-test-sum-test): Update
for bignums.
This commit is contained in:
Tom Tromey 2018-08-08 17:34:42 -06:00
parent 5ebf062ebe
commit 90dba077cf

View file

@ -68,10 +68,10 @@
(1+ #x1fffffff)))
(should (= (mod-test-sum -1 (1+ #x1fffffff))
#x1fffffff)))
(should-error (mod-test-sum 1 most-positive-fixnum)
:type 'overflow-error)
(should-error (mod-test-sum -1 most-negative-fixnum)
:type 'overflow-error))
(should (= (mod-test-sum 1 most-positive-fixnum)
(1+ most-positive-fixnum)))
(should (= (mod-test-sum -1 most-negative-fixnum)
(1- most-negative-fixnum))))
(ert-deftest mod-test-sum-docstring ()
(should (string= (documentation 'mod-test-sum) "Return A + B\n\n(fn a b)")))