]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix byte-compilation warning in benchmark-run
authorLars Ingebrigtsen <larsi@gnus.org>
Wed, 10 Mar 2021 14:52:36 +0000 (15:52 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 10 Mar 2021 14:52:54 +0000 (15:52 +0100)
* lisp/emacs-lisp/benchmark.el (benchmark-run): Avoid a
byte-compilation warning about an empty let body (bug#46819).

lisp/emacs-lisp/benchmark.el

index 14bc2817390fb33735e413813361abc7824f2def..2a3efbe5a1b2fa972dfaf1a7fa21ec914cba24a5 100644 (file)
@@ -62,7 +62,8 @@ See also `benchmark-run-compiled'."
                  ;; Take account of the loop overhead.
                  `(- (benchmark-elapse (dotimes (,i ,repetitions)
                                          ,@forms))
-                     (benchmark-elapse (dotimes (,i ,repetitions))))
+                     (benchmark-elapse (dotimes (,i ,repetitions)
+                                          nil)))
                `(benchmark-elapse ,@forms))
             (- gcs-done ,gcs)
             (- gc-elapsed ,gc)))))