[armedbear-cvs] r12112 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Sun Aug 23 10:24:05 2009
New Revision: 12112

Log:
Re-instate accidentally commented out DELETE-FILE form.

Modified:
   trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	(original)
+++ trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	Sun Aug 23 10:24:05 2009
@@ -8477,8 +8477,7 @@
              (setf compiled-function
                    (load-compiled-function
                     (compile-defun name expr env tempfile))))
-        ;;(delete-file tempfile)
-        ))
+        (delete-file tempfile)))
     (when (and name (functionp compiled-function))
       (sys::set-function-definition name compiled-function definition))
     (or name compiled-function)))