[Openmcl-devel] Probe-file returns a file, load fails!

[Gary King]

Ah, excellent. Your suggestions helped me track things down to a 
problem in our port of our load system from MCL to OpenMCL. Here the 
problem is more on the "from MacIntosh to UNIX" port than the Lisp one. 
On MCL, using *load-pathname* seems to always returns a "full pathname" 
(or something like it) whereas OpenMCL shows me the pathname relative 
to where OpenMCL was started. It looks as if switching to 
*load-truename* will do the trick.

Thanks again,


On Jan 11, 2004, at 5:39 PM, Gary Byers wrote:

> I don't know if it's a factor, but sometimes when pathname operations
> give puzzling, inconsistent results it's worth checking the value of
> *DEFAULT-PATHNAME-DEFAULTS*; things are often more tractable when
> it's an empty pathname (#P"").  If it -is- a factor, it may or may
> not be affecting things correctly.
>
> If it's not a factor in your case, it might be interesting to trace
> PROBE-FILE before calling LOAD, to see what (transformed) pathname
> LOAD's concluding doesn't exist.
>
> On Sun, 11 Jan 2004, Gary King wrote:
>
>> I'm trying to load a file specified by a logical pathname. Probe-file
>> returns an existing physical pathname:
>>
>>> 1 > (probe-file #4P"eksl-utils:source;load-preferences.lisp")
>>> #P"/Volumes/Users/gwking/CVS/CVS/utils/dev/load-preferences.lisp"
>>
>>
>> But when I try to load the file, I get an error:
>>
>>> 1 > (load #4P"eksl-utils:source;load-preferences.lisp")
>>>> Error: File #4P"eksl-utils:source;load-preferences.lisp" does not
>>> exist.
>>>> While executing: "Unknown"
>>>> Type :POP to abort.
>>> Type :? for other options.
>>
>> The translations are as follow:
>>
>>> 2 > (logical-pathname-translations "eksl-utils")
>>> ((#4P"EKSL-UTILS:eksl;**;*.*.*" #P"utils/dev/**/")
>>> (#4P"EKSL-UTILS:source;**;*.*.*" #P"utils/dev/**/")
>>> (#4P"EKSL-UTILS:binary;**;*.*.*" #P"utils/dev/bin-ppc-openmcl/**/")
>>> (#4P"EKSL-UTILS:ktibinary;**;*.*.*"
>>> #P"utils/dev/bin-ppc-openmcl-mac-KTI/**/")
>>> (#4P"EKSL-UTILS:appearance;**;*.*.*" #P"utils/dev/Appearance
>>> Manager/**/") (#4P"EKSL-UTILS:contrib;**;*.*.*"
>>> #P"utils/dev/contrib/**/") (#4P"EKSL-UTILS:lift;**;*.*.*"
>>> #P"LIFT/DEV/**/") (#4P"EKSL-UTILS:**;*.*.*" #P"utils/dev/**/"))
>>
>> I doesn't seem to be a case problem (and shouldn't be anyways, AFAIK):
>>
>>> 2 > (load "EKSL-UTILS:source;load-preferences.lisp")
>>>> Error: File "EKSL-UTILS:source;load-preferences.lisp" does not 
>>>> exist.
>>>> While executing: "Unknown"
>>>> Type :POP to abort.
>>> Type :? for other options.
>>
>> What I have done wrong!
>>
>> Thanks,
>> --
>> Gary Warren King, Lab Manager
>> EKSL East, University of Massachusetts * 413 577 0176
>>
>> Many that live deserve death. And some die that deserve life. Can you
>> give that to them? Then be not too eager to deal out death in the name
>> of justice, fearing for your own safety. Even the wise cannot see all
>> ends.
>>    -- Gandalf, the Two Towers
>>
>> _______________________________________________
>> Openmcl-devel mailing list
>> Openmcl-devel at clozure.com
>> http://clozure.com/mailman/listinfo/openmcl-devel
>>
>>
>
>
-- 
Gary Warren King, Lab Manager
EKSL East, University of Massachusetts * 413 577 0176

"no art, however minor, demands less than total dedication if you want 
to excel in it."
   -- Alberti