aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMattias EngdegÄrd2020-08-19 13:39:18 +0200
committerMattias EngdegÄrd2020-08-19 13:56:32 +0200
commita8fc4f7dcae84757b61a2189faad7659e875e42f (patch)
tree67dd7e8a2d70bcccfc0ad6e236477f5ee12ed581
parent6a61d5edd029f214384d3de95aee49fe43c83559 (diff)
downloademacs-a8fc4f7dcae84757b61a2189faad7659e875e42f.tar.gz
emacs-a8fc4f7dcae84757b61a2189faad7659e875e42f.zip
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."
479(ert-deftest bytecomp-tests--warnings () 479(ert-deftest bytecomp-tests--warnings ()
480 (with-current-buffer (get-buffer-create "*Compile-Log*") 480 (with-current-buffer (get-buffer-create "*Compile-Log*")
481 (let ((inhibit-read-only t)) (erase-buffer))) 481 (let ((inhibit-read-only t)) (erase-buffer)))
482 (dolist (f '(my-test0 my--test11 my--test12 my--test2))
483 (fset f nil))
482 (test-byte-comp-compile-and-load t 484 (test-byte-comp-compile-and-load t
483 '(progn 485 '(progn
484 (defun my-test0 () 486 (defun my-test0 ()