Mercurial > hg > xemacs-beta
diff lisp/bytecomp.el @ 5269:90a0084b3541
Rephrase the #'the docstring, make it nicer while byte-compiling.
lisp/ChangeLog addition:
2010-09-16 Aidan Kehoe <kehoea@parhasard.net>
* bytecomp.el (byte-compile-initial-macro-environment):
* cl-macs.el (the):
Rephrase the docstring, make its implementation when compiling
files a little nicer.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Thu, 16 Sep 2010 15:34:35 +0100 |
| parents | 5663ae9a8989 |
| children | dcc34e28cd84 308d34e9f07d |
line wrap: on
line diff
--- a/lisp/bytecomp.el Thu Sep 16 15:24:40 2010 +0100 +++ b/lisp/bytecomp.el Thu Sep 16 15:34:35 2010 +0100 @@ -504,10 +504,10 @@ (byte-compile-eval (cons 'progn body)) (cons 'progn body))) (the . - ,#'(lambda (&rest body) + ,#'(lambda (type form) (if byte-compile-delete-errors - (second body) - (apply (cdr (symbol-function 'the)) body))))) + form + (funcall (cdr (symbol-function 'the)) type form))))) "The default macro-environment passed to macroexpand by the compiler. Placing a macro here will cause a macro to have different semantics when expanded by the compiler as when expanded by the interpreter.")