test provide

diff --git a/test/src/comp-test-funcs.el b/test/src/comp-test-funcs.el
index 66ce0e70e8d674bcb4aea2e3f889764ae7e2c3d5..79a25511fad8e2c0886cb574b0f3b3cf4aa6845e 100644 (file)
--- a/test/src/comp-test-funcs.el
+++ b/test/src/comp-test-funcs.el
@@ -365,4 +365,6 @@
       (?< 1)
       (?> 2))))
 
+(provide 'comp-test-funcs)
+
 ;;; comp-test-funcs.el ends here

diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index 06a1ae90542959d6ece560f0057a8f8c47aaad30..6eada52541f5bce3d181a5878bd23695f0d31a03 100644 (file)
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -36,8 +36,11 @@
           "comp-test-funcs.el"))
 
 (message "Compiling %s" comp-test-src)
-(native-compile comp-test-src)
-(load (concat comp-test-src "n"))
+(load (native-compile comp-test-src))
+
+(ert-deftest comp-tests-provide ()
+  "Testing top level provide."
+  (should (featurep 'comp-test-funcs)))
 
 (ert-deftest comp-tests-varref ()
   "Testing varref."