From 4b47eb32c6a45ac9f4d4895c1a6dd6db441baafb Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 10 Mar 2021 15:52:36 +0100 Subject: [PATCH] Fix byte-compilation warning in benchmark-run * lisp/emacs-lisp/benchmark.el (benchmark-run): Avoid a byte-compilation warning about an empty let body (bug#46819). --- lisp/emacs-lisp/benchmark.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/benchmark.el b/lisp/emacs-lisp/benchmark.el index 14bc2817390..2a3efbe5a1b 100644 --- a/lisp/emacs-lisp/benchmark.el +++ b/lisp/emacs-lisp/benchmark.el @@ -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))))) -- 2.39.2