diff options
| author | Mattias EngdegÄrd | 2020-08-19 13:39:18 +0200 |
|---|---|---|
| committer | Mattias EngdegÄrd | 2020-08-19 13:56:32 +0200 |
| commit | a8fc4f7dcae84757b61a2189faad7659e875e42f (patch) | |
| tree | 67dd7e8a2d70bcccfc0ad6e236477f5ee12ed581 | |
| parent | 6a61d5edd029f214384d3de95aee49fe43c83559 (diff) | |
| download | emacs-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.el | 2 |
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 () |