From: Basil L. Contovounesios Date: Sun, 21 Jun 2020 18:01:40 +0000 (+0100) Subject: Revert last change in benchmark.el X-Git-Tag: emacs-28.0.90~7121 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0792f8e4f0de2328c57d552a5845bdf77265a971;p=emacs.git Revert last change in benchmark.el For discussion, see the following thread: https://lists.gnu.org/archive/html/emacs-devel/2020-06/msg00791.html * lisp/emacs-lisp/benchmark.el (benchmark-run-compiled): Revert to giving byte-compile a form rather than a closure. --- diff --git a/lisp/emacs-lisp/benchmark.el b/lisp/emacs-lisp/benchmark.el index 984c62ddd54..2fa5a878801 100644 --- a/lisp/emacs-lisp/benchmark.el +++ b/lisp/emacs-lisp/benchmark.el @@ -81,7 +81,7 @@ result. The overhead of the `lambda's is accounted for." (gcs (make-symbol "gcs")) (gc (make-symbol "gc")) (code (byte-compile `(lambda () ,@forms))) - (lambda-code (byte-compile (lambda ())))) + (lambda-code (byte-compile '(lambda ())))) `(let ((,gc gc-elapsed) (,gcs gcs-done)) (list ,(if (or (symbolp repetitions) (> repetitions 1))