; * lisp/emacs-lisp/benchmark.el (benchmark-progn): Fix declare form.
This commit is contained in:
parent
f8d9e40d2c
commit
3bc5efb87e
1 changed files with 1 additions and 1 deletions
|
@ -152,7 +152,7 @@ to call it without any argument."
|
||||||
(defmacro benchmark-progn (&rest body)
|
(defmacro benchmark-progn (&rest body)
|
||||||
"Evaluate BODY and message the time taken.
|
"Evaluate BODY and message the time taken.
|
||||||
The return value is the value of the final form in BODY."
|
The return value is the value of the final form in BODY."
|
||||||
(declare (debug body) (indent 0))
|
(declare (debug t) (indent 0))
|
||||||
(let ((value (make-symbol "value"))
|
(let ((value (make-symbol "value"))
|
||||||
(start (make-symbol "start"))
|
(start (make-symbol "start"))
|
||||||
(gcs (make-symbol "gcs"))
|
(gcs (make-symbol "gcs"))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue