mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-03 10:31:37 -08:00
Merge from emacs-24; up to 2014-05-04T21:18:30Z!eggert@cs.ucla.edu
This commit is contained in:
commit
3e9fa60a5c
46 changed files with 1235 additions and 970 deletions
|
|
@ -2928,7 +2928,7 @@ The function's arguments should be treated as immutable.
|
|||
(defmacro cl-deftype (name arglist &rest body)
|
||||
"Define NAME as a new data type.
|
||||
The type name can then be used in `cl-typecase', `cl-check-type', etc."
|
||||
(declare (debug cl-defmacro) (doc-string 3))
|
||||
(declare (debug cl-defmacro) (doc-string 3) (indent 2))
|
||||
`(cl-eval-when (compile load eval)
|
||||
(put ',name 'cl-deftype-handler
|
||||
(cl-function (lambda (&cl-defs '('*) ,@arglist) ,@body)))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue