[ clocc-Bugs-1561037 ] compile directories created on wrong device

Bugs item #1561037, was opened at 2006-09-18 21:32
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=101802&aid=1561037&group_id=1802

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: defsystem
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Aneil Mallavarapu (amallavarapu)
Assigned to: Marco Antoniotti (marcoxa)
Summary: compile directories created on wrong device

Initial Comment:
Directories created by compile-file-operation, ignore 
the pathname-device component.  This is a problem on 
some Lisps (e.g., Win32 CLisp), which store meaningful 
information in the device component.

In the attached file, I have changed the code in 
compile-file-operation:

from
 (ensure-directories-exist
   (make-pathname
     :host (pathname-host output-file)
     :directory (pathname-directory output-file)))

to:
 (ensure-directories-exist
   (make-pathname
     :device (pathname-device output-file)
     :host (pathname-host output-file)
     :directory (pathname-directory output-file)))


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

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=101802&aid=1561037&group_id=1802

-------------------------------------------------------------------------
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