get right dependency during top level form evaluantion

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 811e03a5edb797ab0bcd84ac4a8f01fb4dee8fff..c5c36e9eda8e4fe19e0fb8fb6947d679e3ec8030 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -282,11 +282,11 @@ Put PREFIX in front of it."
   "Byte compile FILENAME spilling data from the byte compiler."
   (byte-compile-file filename)
   (setf (comp-ctxt-top-level-defvars comp-ctxt)
-        (mapcar (lambda (x)
-                  (if (eq (car x) 'defvar)
-                      (cdr x)
-                    (cl-assert nil)))
-                byte-to-native-top-level-forms))
+        (reverse (mapcar (lambda (x)
+                           (if (eq (car x) 'defvar)
+                               (cdr x)
+                             (cl-assert nil)))
+                         byte-to-native-top-level-forms)))
   (cl-loop for (name lap bytecode) in byte-to-native-output
            for lambda-list = (aref bytecode 0)
            for func = (make-comp-func :symbol-name name