Mercurial > hg > xemacs-beta
comparison lisp/bytecomp-runtime.el @ 5615:5f4f92a31875
Move the functionality of #'cl-macroexpand into Fmacroexpand, eval.c
src/ChangeLog addition:
2011-12-22 Aidan Kehoe <kehoea@parhasard.net>
* eval.c (Fmacroexpand): Rename Fmacroexpand_internal, add the
functionality that used to be in #'cl-macroexpand--it makes no
sense for us, and needlessly slows things down, to have two
separate functions.
* eval.c:
* eval.c (syms_of_eval):
Move byte-compile-macro-environment here, now it's used by
#'macroexpand.
lisp/ChangeLog addition:
2011-12-22 Aidan Kehoe <kehoea@parhasard.net>
* bytecomp-runtime.el:
* bytecomp-runtime.el (byte-compile-macro-environment): Moved to
eval.c.
* cl.el:
* cl.el ('cl-macroexpand): New alias.
* cl.el ('macroexpand-internal): New alias.
* cl.el (cl-macroexpand): Move the functionality of this to
#'macroexpand (formerly #'macroexpand-internal) in eval.c; since
CL is always loaded in XEmacs, it brings nothing and slows things
down to have the two functions separate.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Thu, 22 Dec 2011 12:51:03 +0000 |
| parents | 855b667dea13 |
| children |
comparison
equal
deleted
inserted
replaced
| 5614:281bf2b87915 | 5615:5f4f92a31875 |
|---|---|
| 632 (warnings (- callargs)) ; Don't warn about arglist mismatch | 632 (warnings (- callargs)) ; Don't warn about arglist mismatch |
| 633 (warnings (+ unused-vars)) ; Do warn about unused bindings | 633 (warnings (+ unused-vars)) ; Do warn about unused bindings |
| 634 (file-format emacs19))" | 634 (file-format emacs19))" |
| 635 nil) | 635 nil) |
| 636 | 636 |
| 637 (defvar byte-compile-macro-environment nil | |
| 638 "Alist of macros defined in the file being compiled. | |
| 639 Each element looks like (MACRONAME . DEFINITION). It is | |
| 640 \(MACRONAME . nil) when a macro is redefined as a function.") | |
| 641 | |
| 642 ;;; bytecomp-runtime.el ends here | 637 ;;; bytecomp-runtime.el ends here |