diff options
| author | Philipp Stephani | 2018-01-28 20:20:07 +0100 |
|---|---|---|
| committer | Philipp Stephani | 2018-01-28 20:20:07 +0100 |
| commit | d0733704b3dfae0f9487b0d1d8814b6ac8081981 (patch) | |
| tree | e34758f690b0ae0159ccc8f23785b384140b2686 /test/src | |
| parent | 70831c8f64bb158791808e06bb8a07072d940eb1 (diff) | |
| download | emacs-d0733704b3dfae0f9487b0d1d8814b6ac8081981.tar.gz emacs-d0733704b3dfae0f9487b0d1d8814b6ac8081981.zip | |
Test that module functions are functions.
* test/src/emacs-module-tests.el (module-function-object): Verify that
a module function is treated as a function.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/emacs-module-tests.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/test/src/emacs-module-tests.el b/test/src/emacs-module-tests.el index 85d63053867..162af21bbec 100644 --- a/test/src/emacs-module-tests.el +++ b/test/src/emacs-module-tests.el | |||
| @@ -72,6 +72,7 @@ This test needs to be changed whenever the implementation | |||
| 72 | changes." | 72 | changes." |
| 73 | (let ((func (symbol-function #'mod-test-sum))) | 73 | (let ((func (symbol-function #'mod-test-sum))) |
| 74 | (should (module-function-p func)) | 74 | (should (module-function-p func)) |
| 75 | (should (functionp func)) | ||
| 75 | (should (equal (type-of func) 'module-function)) | 76 | (should (equal (type-of func) 'module-function)) |
| 76 | (should (string-match-p | 77 | (should (string-match-p |
| 77 | (rx bos "#<module function " | 78 | (rx bos "#<module function " |