diff options
| -rw-r--r-- | lisp/emacs-lisp/cond-star.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cond-star.el b/lisp/emacs-lisp/cond-star.el index 33a21602d9b..72b58d91151 100644 --- a/lisp/emacs-lisp/cond-star.el +++ b/lisp/emacs-lisp/cond-star.el | |||
| @@ -92,7 +92,13 @@ passed along to the rest of the clauses in this `cond*' construct. | |||
| 92 | 92 | ||
| 93 | See `match*' for documentation of the patterns for use in `match*' | 93 | See `match*' for documentation of the patterns for use in `match*' |
| 94 | conditions." | 94 | conditions." |
| 95 | ;; FIXME: Want an Edebug declaration. | 95 | (declare |
| 96 | (debug (&rest ([&or ("bind*" &rest &or symbolp (symbolp &optional form)) | ||
| 97 | ("bind-and*" &rest &or symbolp (symbolp form) (form)) | ||
| 98 | ("match*" sexp form) | ||
| 99 | ("pcase*" pcase-PAT form) | ||
| 100 | form] | ||
| 101 | body)))) | ||
| 96 | (cond*-convert clauses)) | 102 | (cond*-convert clauses)) |
| 97 | 103 | ||
| 98 | ;; The following four macros are autoloaded for the sake of syntax | 104 | ;; The following four macros are autoloaded for the sake of syntax |