mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-13 04:42:13 -08:00
Code Issues Projects Releases Packages Wiki Activity

Fix MAKE-BUILD: filter out :FASL files from INPUT-FILES return value.

Browse source
This commit is contained in:
Samium Gromoff 2009-04-18 16:24:11 +04:00 • committed by Juan Jose Garcia Ripoll
parent 1089d7087f
commit a42dbe52bc
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
contrib/asdf/asdf-ecl.lisp Normal file → Executable file
View file

@ -180,10 +180,10 @@
t)
(defmethod perform ((o bundle-op) (c system))
(let* ((object-files (input-files o c))
(output (first (output-files o c))))
(ensure-directories-exist output)
(apply #'c::builder (bundle-op-type o) output :lisp-files object-files
(let* ((object-files (remove "fas" (input-files o c) :key #'pathname-type :test #'string=))
(output (output-files o c)))
(ensure-directories-exist (first output))
(apply #'c::builder (bundle-op-type o) (first output) :lisp-files object-files
(bundle-op-build-args o))))
(defun select-operation (monolithic type)