procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Ignore ert-deftest body value

Browse source 
* lisp/emacs-lisp/ert.el (ert-deftest):
Since the return value of the body isn't going to be used, ignore
it explicitly so that the compiler can warn if we try to return
something anyway.  In particular, this exposes some comparisons
whose result weren't actually checked.
This commit is contained in:
Mattias Engdegård 2023-08-14 16:48:05 +02:00
parent 31ee2ad5ac
commit 33bcd4f2d2
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/ert.el
View file

@ -237,7 +237,9 @@ in batch mode, an error is signaled.
`(:expected-result-type ,expected-result))
,@(when tags-supplied-p
`(:tags ,tags))
:body (lambda () ,@body)
;; Add `nil' after the body to enable compiler warnings
;; about unused computations at the end.
:body (lambda () ,@body nil)
:file-name ,(or (macroexp-file-name) buffer-file-name)))
',name))))