* lisp/emacs-lisp/cl-lib.el (cl-declaim): Paren typo.

This commit is contained in:
Stefan Monnier 2012-12-09 20:32:36 -05:00
parent 8d1a544c11
commit bad162fd1b
2 changed files with 8 additions and 5 deletions

View file

@ -260,7 +260,7 @@ one value.
"Like `cl-proclaim', but takes any number of unevaluated, unquoted arguments.
Puts `(cl-eval-when (compile load eval) ...)' around the declarations
so that they are registered at compile-time as well as run-time."
(let ((body (mapcar (lambda (x) `(cl-proclaim ',x) specs))))
(let ((body (mapcar (lambda (x) `(cl-proclaim ',x)) specs)))
(if (cl--compiling-file) `(cl-eval-when (compile load eval) ,@body)
`(progn ,@body)))) ; Avoid loading cl-macs.el for cl-eval-when.