1
Fork 0
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:
Paul Eggert 2014-05-04 12:37:56 -07:00
commit 3e9fa60a5c
46 changed files with 1235 additions and 970 deletions

View file

@ -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)))))