Changeset 11677

Timestamp:

02/21/09 21:53:38 (14 years ago)

Author:

ehuelsmann

Message:

Remove accidentally committed debug PRINT forms.

File:

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

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

@@ -86 +86 @@
       (setf output-path *default-pathname-defaults*))
     (flet ((do-compile (file)
-             (print file)
-             (print output-path)
              (let ((out (make-pathname :type "abcl"
-                                       :defaults (print (merge-pathnames
-                                                  file output-path)))))
+                                       :defaults (merge-pathnames
+                                                  file output-path))))
                (compile-file-if-needed file :output-file out))))
       (load (do-compile "coerce.lisp"))