diff options
Diffstat (limited to 'users/wpcarro/emacs/pkgs/list/tests.el')
| -rw-r--r-- | users/wpcarro/emacs/pkgs/list/tests.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/users/wpcarro/emacs/pkgs/list/tests.el b/users/wpcarro/emacs/pkgs/list/tests.el index 4ee03c6b97..4b45796883 100644 --- a/users/wpcarro/emacs/pkgs/list/tests.el +++ b/users/wpcarro/emacs/pkgs/list/tests.el @@ -97,6 +97,10 @@ (should (equal '(a b c) (list-delete 'b '(a b b c)))) (should (equal '() (list-delete 'b '())))) +(ert-deftest list-concat () + (should (equal '(1 2 3 4 5) (list-concat '(1) '(2 3) '(4 5)))) + (should (equal '(1 2 3) (list-concat '() '(1 2 3))))) + ;; TODO(wpcarro): Supoprt this. ;; (ert-deftest list-zip () ;; (should (equal '((1 3 5) (2 4 6)) (list-zip '(1 2) '(3 4) '(5 6)))) |