diff options
| -rw-r--r-- | lisp/emacs-lisp/cl-generic.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el index 107d520b1e9..068f4fb0c84 100644 --- a/lisp/emacs-lisp/cl-generic.el +++ b/lisp/emacs-lisp/cl-generic.el | |||
| @@ -415,8 +415,9 @@ The set of acceptable TYPEs (also called \"specializers\") is defined | |||
| 415 | (&define ; this means we are defining something | 415 | (&define ; this means we are defining something |
| 416 | [&or symbolp ("setf" symbolp)] | 416 | [&or symbolp ("setf" symbolp)] |
| 417 | ;; ^^ This is the methods symbol | 417 | ;; ^^ This is the methods symbol |
| 418 | [ &optional keywordp ; this is key :before etc | 418 | [ &rest atom ] ; Multiple qualifiers are allowed. |
| 419 | &optional stringp ] ; :extra can be followed by a string | 419 | ; Like in CLOS spec, we support |
| 420 | ; any non-list values. | ||
| 420 | listp ; arguments | 421 | listp ; arguments |
| 421 | [ &optional stringp ] ; documentation string | 422 | [ &optional stringp ] ; documentation string |
| 422 | def-body))) ; part to be debugged | 423 | def-body))) ; part to be debugged |