emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 0792f8e: Revert last change in benchmark.el


From: Basil L. Contovounesios
Subject: master 0792f8e: Revert last change in benchmark.el
Date: Sun, 21 Jun 2020 14:07:33 -0400 (EDT)

branch: master
commit 0792f8e4f0de2328c57d552a5845bdf77265a971
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    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.
---
 lisp/emacs-lisp/benchmark.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/benchmark.el b/lisp/emacs-lisp/benchmark.el
index 984c62d..2fa5a87 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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]