]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert last change in benchmark.el
authorBasil L. Contovounesios <contovob@tcd.ie>
Sun, 21 Jun 2020 18:01:40 +0000 (19:01 +0100)
committerBasil L. Contovounesios <contovob@tcd.ie>
Sun, 21 Jun 2020 18:01:40 +0000 (19:01 +0100)
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.

lisp/emacs-lisp/benchmark.el

index 984c62ddd54b67334290bee7c055aab565634d71..2fa5a878801b10f1f380f01d4f0887c5de5f74c1 100644 (file)
@@ -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))