diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-09-26 14:28:36 +0200 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-09-26 15:32:21 +0200 |
| commit | 29a8d9303bd3098eed88f3eb7394b66ae28cc887 (patch) | |
| tree | 029a1e608067673f239526f3f33e971abbf9d943 /lisp/emacs-lisp | |
| parent | 06acf681d6fd8e2c5c6a9584b5df6b98eccda20b (diff) | |
| download | emacs-29a8d9303bd3098eed88f3eb7394b66ae28cc887.tar.gz emacs-29a8d9303bd3098eed88f3eb7394b66ae28cc887.tar.bz2 emacs-29a8d9303bd3098eed88f3eb7394b66ae28cc887.zip | |
* lisp/emacs-lisp/cl-macs.el (cl--optimize): Add a FIXME.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index e7c7374976a..9c41374fc70 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -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 |