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
|