From: Andrea Corallo <akrl@sdf.org>
Date: Mon, 4 Nov 2019 22:38:37 +0000 (+0100)
Subject: fix top level macro generation
X-Git-Tag: emacs-28.0.90~2727^2~1036
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f15b4c3ca98e6af3dfe61f70d0043ae896167ac;p=emacs.git

fix top level macro generation
---

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index a4bdbacf76f..836377b4df3 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2712,7 +2712,7 @@ not to take responsibility for the actual compilation of the code."
               ;; Spill output for the native compiler here.
               (push (if macro
                         (make-byte-to-native-top-level
-                         :form `(defalias ,name (macro . ,code) nil))
+                         :form `(defalias ',name '(macro . ,code) nil))
                       (make-byte-to-native-function :name name :data code))
                     byte-to-native-top-level-forms))
             ;; Output the form by hand, that's much simpler than having