diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2015-11-27 13:11:00 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2015-11-27 13:11:00 +0200 |
| commit | 8dcdca346f02ebb93feab9f9b8c9091bc39eb058 (patch) | |
| tree | 3830212066a23ff85db0a84517e30adff062b782 /modules | |
| parent | 1ed316d275241384f63b4dd6e39c7439d1ca56c9 (diff) | |
| download | emacs-8dcdca346f02ebb93feab9f9b8c9091bc39eb058.tar.gz | |
Add module tests for wrong-type-argument
* modules/mod-test/test.el (mod-test-sum-test): Add tests for
wrong-type-argument.
Diffstat (limited to 'modules')
| -rw-r--r-- | modules/mod-test/test.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/modules/mod-test/test.el b/modules/mod-test/test.el index 34090d9b062..3cb4e9344ca 100644 --- a/modules/mod-test/test.el +++ b/modules/mod-test/test.el @@ -38,7 +38,9 @@ "#<module function at \\(0x\\)?[0-9a-fA-F]+ from .*>" "#<module function Fmod_test_sum from .*>") (nth 1 descr)))) - (should (= (nth 2 descr) 3)))) + (should (= (nth 2 descr) 3))) + (should-error (mod-test-sum "1" 2) :type 'wrong-type-argument) + (should-error (mod-test-sum 1 "2") :type 'wrong-type-argument)) (ert-deftest mod-test-sum-docstring () (should (string= (documentation 'mod-test-sum) "Return A + B"))) |