summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2020-08-19 13:39:18 +0200
committerMattias EngdegÄrd <mattiase@acm.org>2020-08-19 13:56:32 +0200
commita8fc4f7dcae84757b61a2189faad7659e875e42f (patch)
tree67dd7e8a2d70bcccfc0ad6e236477f5ee12ed581
parent6a61d5edd029f214384d3de95aee49fe43c83559 (diff)
downloademacs-a8fc4f7dcae84757b61a2189faad7659e875e42f.tar.gz
Make bytecomp-tests re-runnable
* test/lisp/emacs-lisp/bytecomp-tests.el (test-byte-comp-macro-expand-lexical-override): Remove functions before testing so that the test can be run twice without failing.
-rw-r--r--test/lisp/emacs-lisp/bytecomp-tests.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/bytecomp-tests.el b/test/lisp/emacs-lisp/bytecomp-tests.el
index 894914300ae..27acdffa532 100644
--- a/test/lisp/emacs-lisp/bytecomp-tests.el
+++ b/test/lisp/emacs-lisp/bytecomp-tests.el
@@ -479,6 +479,8 @@ Subtests signal errors if something goes wrong."
(ert-deftest bytecomp-tests--warnings ()
(with-current-buffer (get-buffer-create "*Compile-Log*")
(let ((inhibit-read-only t)) (erase-buffer)))
+ (dolist (f '(my-test0 my--test11 my--test12 my--test2))
+ (fset f nil))
(test-byte-comp-compile-and-load t
'(progn
(defun my-test0 ()