diff --git a/femtolisp/system.lsp b/femtolisp/system.lsp
index 56e13d5..b9afa82 100644
--- a/femtolisp/system.lsp
+++ b/femtolisp/system.lsp
@@ -753,7 +753,7 @@
 		     (begin
 		       (io.print f s) (io.write f "\n")
 		       (io.print f (top-level-value s)) (io.write f "\n"))))
-	       (simple-sort (environment)))
+	       (nreverse (simple-sort (environment))))
      (begin
        (io.close f)
        (set! *print-pretty* pp)))))