From e775ef2f57e7889e29edbf44e6f6a2deb79d2635 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 11 Jun 2021 14:06:29 -0400 Subject: [PATCH] * lisp/emacs-lisp/benchmark.el (benchmark-elapse): Tweak --- lisp/emacs-lisp/benchmark.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/benchmark.el b/lisp/emacs-lisp/benchmark.el index 439d3bd363e..64c628822df 100644 --- a/lisp/emacs-lisp/benchmark.el +++ b/lisp/emacs-lisp/benchmark.el @@ -37,8 +37,7 @@ "Return the time in seconds elapsed for execution of FORMS." (declare (indent 0) (debug t)) (let ((t1 (make-symbol "t1"))) - `(let (,t1) - (setq ,t1 (current-time)) + `(let ((,t1 (current-time))) ,@forms (float-time (time-since ,t1))))) -- 2.39.5