aboutsummaryrefslogtreecommitdiffstats
path: root/test/src/lread-tests.el
diff options
context:
space:
mode:
authorTom Tromey2018-07-07 15:32:34 -0600
committerTom Tromey2018-07-12 22:12:27 -0600
commit6d4bf2cedab365411f0aedb373b63291086658e9 (patch)
treef88607e4c8b2e21fe2024cbf14014d9bc6396350 /test/src/lread-tests.el
parent5875fbaa2dfd919a2ba22db1d20ffa6c4c6e13bd (diff)
downloademacs-6d4bf2cedab365411f0aedb373b63291086658e9.tar.gz
emacs-6d4bf2cedab365411f0aedb373b63291086658e9.zip
Add some bignum tests
* test/src/data-tests.el (data-tests-bignum, data-tests-+) (data-tests-/, data-tests-number-predicates): New tests. * test/src/fns-tests (test-bignum-eql): New test. * test/src/lread-tests (lread-long-hex-integer): Expect bignum. * test/src/print-tests (print-bignum): New test.
Diffstat (limited to 'test/src/lread-tests.el')
-rw-r--r--test/src/lread-tests.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/test/src/lread-tests.el b/test/src/lread-tests.el
index 639a6da93ae..17381340c7b 100644
--- a/test/src/lread-tests.el
+++ b/test/src/lread-tests.el
@@ -195,9 +195,7 @@ literals (Bug#20852)."
195 (should (eq x (cdr x))))) 195 (should (eq x (cdr x)))))
196 196
197(ert-deftest lread-long-hex-integer () 197(ert-deftest lread-long-hex-integer ()
198 (should-error 198 (should (bignump (read "#xffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff"))))
199 (read "#xffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff")
200 :type 'overflow-error))
201 199
202(ert-deftest lread-test-bug-31186 () 200(ert-deftest lread-test-bug-31186 ()
203 (with-temp-buffer 201 (with-temp-buffer