mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/cl-macs.el (cl--optimize): Add a FIXME.

Browse source
This commit is contained in:
Andrea Corallo 2020-09-26 14:28:36 +02:00
parent 06acf681d6
commit 29a8d9303b
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/cl-macs.el
View file

@ -2359,6 +2359,8 @@ Example:
(defun foo (x)
(declare (cl-optimize (speed 3) (safety 0)))
x)"
;; FIXME this should make use of `cl--declare-stack' but I suspect
;; this mechanism should be reviewed first.
(cl-loop for (qly val) in qualities
do (cl-ecase qly
(speed