[Openmcl-devel] pathname problem with load
gb at clozure.com
Mon Jul 4 21:37:46 EDT 2005
On Mon, 4 Jul 2005, Rick Taube wrote:
> Hi -- this seems like a bug to me: probe-file and truename can handle this
> shell-script generated pathname but then load cannot:
> Welcome to OpenMCL Version (Beta: Darwin) 0.14.3!
> ? (probe-file "/Lisp/cm/bin/./../src/cm.lisp")
> ? (truename "/Lisp/cm/bin/./../src/cm.lisp")
> ? (load "/Lisp/cm/bin/./../src/cm.lisp")
>> Error in process listener(1): File "/Lisp/cm/bin/./../src/cm.lisp" does not
>> While executing: "Unknown"
>> Type :POP to abort.
> Type :? for other options.
> 1 >
This has the feel of putting a bandaid on a symptom and ignoring the real
problem, but the symptom can be fixed in this case by making the function
CCL::REMOVE-UP (in "ccl:level-1;l1-files.lisp") remove any (redundant)
"." components from its argument:
(defun remove-up (dir)
(SETQ DIR (DELETE "." DIR :TEST #'STRING=))
(LET ((n 0)
More information about the Openmcl-devel