fix top level macro generation

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index a4bdbacf76ffac508a7361f7ec0e513e40e601e1..836377b4df3a4685a304fb2e192f5f0591747ebd 100644 (file)
--- 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