Compilation warning fix for byte-run.el

* lisp/emacs-lisp/byte-run.el (macro-declaration-function):
Suppress warning about obsolete function used by obsolete variable.

1 files changed, 4 insertions, 3 deletions

diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el
index 6a21a0c909d..81f8f11044e 100644
--- a/lisp/emacs-lisp/byte-run.el
+++ b/lisp/emacs-lisp/byte-run.el
@@ -45,12 +45,13 @@ So far, FUNCTION can only be a symbol, not a lambda expression."
 ;; `macro-declaration-function' are both obsolete (as marked at the end of this
 ;; file) but used in many .elc files.
 
-(defvar macro-declaration-function #'macro-declaration-function
-  "Function to process declarations in a macro definition.
+(with-suppressed-warnings ((obsolete macro-declaration-function))
+  (defvar macro-declaration-function #'macro-declaration-function
+    "Function to process declarations in a macro definition.
 The function will be called with two args MACRO and DECL.
 MACRO is the name of the macro being defined.
 DECL is a list `(declare ...)' containing the declarations.
-The value the function returns is not used.")
+The value the function returns is not used."))
 
 (defalias 'macro-declaration-function
   #'(lambda (macro decl)