diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2019-05-30 14:34:45 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-05-30 14:58:13 -0700 |
| commit | b354935902d3820f59e34e18a47264122e99c1a4 (patch) | |
| tree | 7923075e53fed6c0fa1f5287c2176d4ac4474e17 /test/src/fns-tests.el | |
| parent | 57e9141a9c3ac38a1bc63b2311f1b6a5a42ac604 (diff) | |
| download | emacs-b354935902d3820f59e34e18a47264122e99c1a4.tar.gz | |
Fix `memql' for bignums
* src/fns.c (Fmemql): Make `memql' work for bignums.
* test/src/fns-tests.el (test-bignum-eql): Also test `memql'.
Diffstat (limited to 'test/src/fns-tests.el')
| -rw-r--r-- | test/src/fns-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/src/fns-tests.el b/test/src/fns-tests.el index 6ebab4287f7..a9d4d11795c 100644 --- a/test/src/fns-tests.el +++ b/test/src/fns-tests.el @@ -614,7 +614,8 @@ (should (eq x x)) (should (eql x y)) (should (equal x y)) - (should-not (eql x 0.0e+NaN)))) + (should-not (eql x 0.0e+NaN)) + (should (memql x (list y))))) (ert-deftest test-bignum-hash () "Test that hash tables work for bignums." |