diff options
| author | Glenn Morris | 2019-06-12 17:20:50 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-06-12 17:20:50 -0700 |
| commit | fb69593f60350e9ac4fceeacd9b81e1ec474600e (patch) | |
| tree | 8dce2d462b4d43ee59383ad4e465bca8b8912ebe | |
| parent | c717a5bf53a9f08f2123968b62800a8450589719 (diff) | |
| download | emacs-fb69593f60350e9ac4fceeacd9b81e1ec474600e.tar.gz emacs-fb69593f60350e9ac4fceeacd9b81e1ec474600e.zip | |
Revert "Compilation warning fix for byte-run.el"
* lisp/emacs-lisp/byte-run.el (macro-declaration-function):
Revert change that causes a bootstrap failure.
; Ref eg https://hydra.nixos.org/build/94678649
| -rw-r--r-- | lisp/emacs-lisp/byte-run.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 81f8f11044e..6a21a0c909d 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el | |||
| @@ -45,13 +45,12 @@ So far, FUNCTION can only be a symbol, not a lambda expression." | |||
| 45 | ;; `macro-declaration-function' are both obsolete (as marked at the end of this | 45 | ;; `macro-declaration-function' are both obsolete (as marked at the end of this |
| 46 | ;; file) but used in many .elc files. | 46 | ;; file) but used in many .elc files. |
| 47 | 47 | ||
| 48 | (with-suppressed-warnings ((obsolete macro-declaration-function)) | 48 | (defvar macro-declaration-function #'macro-declaration-function |
| 49 | (defvar macro-declaration-function #'macro-declaration-function | 49 | "Function to process declarations in a macro definition. |
| 50 | "Function to process declarations in a macro definition. | ||
| 51 | The function will be called with two args MACRO and DECL. | 50 | The function will be called with two args MACRO and DECL. |
| 52 | MACRO is the name of the macro being defined. | 51 | MACRO is the name of the macro being defined. |
| 53 | DECL is a list `(declare ...)' containing the declarations. | 52 | DECL is a list `(declare ...)' containing the declarations. |
| 54 | The value the function returns is not used.")) | 53 | The value the function returns is not used.") |
| 55 | 54 | ||
| 56 | (defalias 'macro-declaration-function | 55 | (defalias 'macro-declaration-function |
| 57 | #'(lambda (macro decl) | 56 | #'(lambda (macro decl) |