Remove temporary files

This commit is contained in:
jjgarcia 2004-06-18 08:23:52 +00:00
parent 65c027eb7b
commit 7a345f89ed

View file

@ -549,8 +549,8 @@ Cannot compile ~a."
;;(si::system (format nil "cat ~A" (namestring c-pathname)))
(compiler-cc c-pathname o-pathname)
(bundle-cc so-pathname o-pathname)
;(delete-file c-pathname)
;(delete-file h-pathname)
(delete-file c-pathname)
(delete-file h-pathname)
(delete-file o-pathname)
(delete-file data-pathname)
(cond ((probe-file so-pathname)