[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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 0792f8e: Revert last change in benchmark.el,
Basil L. Contovounesios <=