diff --git a/contrib/asdf/asdf-ecl.lisp b/contrib/asdf/asdf-ecl.lisp
index 87e9352d3..985869d50 100644
--- a/contrib/asdf/asdf-ecl.lisp
+++ b/contrib/asdf/asdf-ecl.lisp
@@ -62,7 +62,8 @@
 	collect (car (output-files (make-instance 'build-op) c))))
 
 (defmethod output-files ((o build-op) (c system))
-  (list (compile-file-pathname (component-name c) :type (build-op-type o))))
+  (list (merge-pathnames (component-pathname c)
+			 (compile-file-pathname (component-name c) :type (build-op-type o)))))
 
 (defmethod input-files ((o build-op) (c system))
   (append (get-object-files c)