diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/map-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/automated/map-tests.el b/test/automated/map-tests.el index 8693415a784..1a759b523a5 100644 --- a/test/automated/map-tests.el +++ b/test/automated/map-tests.el | |||
| @@ -320,5 +320,12 @@ Evaluate BODY for each created map. | |||
| 320 | (should (= b 2)) | 320 | (should (= b 2)) |
| 321 | (should (null c)))) | 321 | (should (null c)))) |
| 322 | 322 | ||
| 323 | (ert-deftest test-map-merge-with () | ||
| 324 | (should (equal (map-merge-with 'list #'+ | ||
| 325 | '((1 . 2)) | ||
| 326 | '((1 . 3) (2 . 4)) | ||
| 327 | '((1 . 1) (2 . 5) (3 . 0))) | ||
| 328 | '((3 . 0) (2 . 9) (1 . 6))))) | ||
| 329 | |||
| 323 | (provide 'map-tests) | 330 | (provide 'map-tests) |
| 324 | ;;; map-tests.el ends here | 331 | ;;; map-tests.el ends here |