From: Andrea Corallo <akrl@sdf.org>
Date: Sat, 29 Aug 2020 13:15:46 +0000 (+0200)
Subject: * test/src/comp-tests.el (comp-tests-doc): Update test.
X-Git-Tag: emacs-28.0.90~2727^2~469
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ea35a62e6e200f00e22828a7d0994ee2a4d2fc6a;p=emacs.git

* test/src/comp-tests.el (comp-tests-doc): Update test.
---

diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index 33b307b1c6e..2a078be8cb0 100644
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -322,7 +322,9 @@ Check that the resulting binaries do not differ."
 (ert-deftest comp-tests-doc ()
   (should (string= (documentation #'comp-tests-doc-f)
                    "A nice docstring"))
-  (should (string-match "\\.*.eln\\'" (symbol-file #'comp-tests-doc-f))))
+  ;; Check a preloaded function, we can't use `comp-tests-doc-f' now
+  ;; as this is loaded manually with no .elc.
+  (should (string-match "\\.*.elc\\'" (symbol-file #'error))))
 
 (ert-deftest comp-test-interactive-form ()
   (should (equal (interactive-form #'comp-test-interactive-form0-f)