Is this correct?

"Marco Antoniotti (as marco dot antoniotti at unimib dot it)" <[email protected]>
Newsgroups gmane.lisp.lispworks.general
Message-ID <CAG0Nw2m9gQXjnk5TeWOztEx=P8kU4pN8kY4UZCVtC3PXGku=Tw@mail.gmail.com>
Hi

I am finding some issues with *load-pathname* and *load-truename*.

Here is what I see in LWM (8.x).  I did a change-directory beforehand).

CL-USER 5 > *(load "tmp/lpn.lisp")*
; Loading text file /Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp
LPN: Test: *load-pathname* #P"tmp/lpn.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"

CL-USER 6 > *(load "tmp/Lpn.lisp")*
; Loading text file /Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/Lpn.lisp
LPN: Test: *load-pathname* #P"tmp/Lpn.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/Lpn.lisp"
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/Lpn.lisp"

CL-USER 7 > *(load "tmp/LPN.lisp")*
; Loading text file /Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/LPN.lisp
LPN: Test: *load-pathname* #P"tmp/LPN.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/LPN.lisp"
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/LPN.lisp"

However, SCBL seems to be "more correct".

CL-USER> *(load "tmp/lpn.lisp")*
LPN: Test: *load-pathname*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"
T
CL-USER> *(load "tmp/Lpn.lisp")*
LPN: Test: *load-pathname*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/Lpn.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"
T
CL-USER> *(load "tmp/LPN.lisp")*
LPN: Test: *load-pathname*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/LPN.lisp"
LPN: Test: *load-truename*
#P"/Users/marcoxa/Projects/Lang/CL/HELambdaP/tmp/lpn.lisp"
T

The actual file is tmp/lpn.lisp and it is listed below.

(format t "LPN: Test: *load-pathname* ~S~%" *load-pathname*)
(format t "LPN: Test: *load-truename* ~S~%" *load-truename*)

Any thoughts?

Marco

-- 
Marco Antoniotti, Professor, Director         tel. +39 - 02 64 48 79 01
DISCo, University of Milan-Bicocca U14 2043   http://dcb.disco.unimib.it
Viale Sarca 336
I-20126 Milan (MI) ITALY

REGAINS: https://regains.disco.unimib.it/
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.