[ cclan-Bugs-1596807 ] Consider adding files-in-system?

Bugs item #1596807, was opened at 2006-11-15 06:49
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=393636&aid=1596807&group_id=28536

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: asdf
Group: None
Status: Open
Resolution: None
Priority: 5
Private: No
Submitted By: Aneil Mallavarapu (amallavarapu)
Assigned to: Daniel Barlow (dan_b)
Summary: Consider adding files-in-system?

Initial Comment:
I'm switching over to ASDF from MAKE.  I miss the files-in-system function... Consider adding it & make it external?

Here is a quick hack:

(defun files-in-system (system)
  (remove-duplicates 
   (loop for (op . component) in (traverse (make-instance 'load-op)
                                           (find-system system))
         when (and (typep component 'component)
                   (stringp (pathname-name (component-pathname component))))
         collect (component-pathname component)) :test #'equalp))

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=393636&aid=1596807&group_id=28536

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV