Changeset 11811 for trunk/abcl/src/org/armedbear/lisp/compile-file.lisp

Timestamp:

05/01/09 20:43:46 (14 years ago)

Author:

ehuelsmann

Message:

Add documentation as to why we do what we were doing.

File:

• trunk/abcl/src/org/armedbear/lisp/compile-file.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/compile-file.lisp

@@ -315 +315 @@
                      (note-toplevel-form form)
                      (let ((new-form (convert-toplevel-form form)))
+                       ;; The converted form depends on the loader
+                       ;; but since we don't own the loader here,
+                       ;; we'll dump the converted form and eval
+                       ;; the original one (which won't depend on the loader
+                       ;; because it doesn't contain a compiled function)
                        (when (consp new-form)
                          (dump-form new-form stream)