From: Philipp Stephani <phst@google.com>
Date: Sun, 28 Jan 2018 19:20:07 +0000 (+0100)
Subject: Test that module functions are functions.
X-Git-Tag: emacs-27.0.90~5787
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d0733704b3dfae0f9487b0d1d8814b6ac8081981;p=emacs.git

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.
---

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
 changes."
   (let ((func (symbol-function #'mod-test-sum)))
     (should (module-function-p func))
+    (should (functionp func))
     (should (equal (type-of func) 'module-function))
     (should (string-match-p
              (rx bos "#<module function "