diff options
| author | Yuuki Harano <masm+github@masm11.me> | 2021-06-13 17:34:06 +0900 |
|---|---|---|
| committer | Yuuki Harano <masm+github@masm11.me> | 2021-06-13 17:34:06 +0900 |
| commit | 7d5e94bada09e642a8bfc4f66804f7948bad40bc (patch) | |
| tree | 38629672102b31bb38a855f24d4dd009e212c10d /lisp/emacs-lisp/benchmark.el | |
| parent | 7673b6b9eb0af3add73e1614a466f142092b00aa (diff) | |
| parent | dc471feee3bcac872cc52cdc73282955cd2d219d (diff) | |
| download | emacs-7d5e94bada09e642a8bfc4f66804f7948bad40bc.tar.gz emacs-7d5e94bada09e642a8bfc4f66804f7948bad40bc.tar.bz2 emacs-7d5e94bada09e642a8bfc4f66804f7948bad40bc.zip | |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'lisp/emacs-lisp/benchmark.el')
| -rw-r--r-- | lisp/emacs-lisp/benchmark.el | 3 |
1 files changed, 1 insertions, 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))))) |