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