Hi,
Ah, I should have though to include the components instead of the #P format. Here's what I get on the various Lisps for:
(defun show (x) (list :host (pathname-host x) :device (pathname-device x) :directory (pathname-directory x) :name (pathname-name x) :type (pathname-type x) :version (pathname-version x)))
(show (uiop:parse-native-namestring "."))
Cheers, Jared
CCL: (:HOST :UNSPECIFIC :DEVICE NIL :DIRECTORY NIL :NAME NIL :TYPE "" :VERSION NIL)
SBCL: (:HOST #<SB-IMPL::UNIX-HOST {1000F38E53}> :DEVICE NIL :DIRECTORY (:RELATIVE) :NAME "." :TYPE NIL :VERSION NIL)
Allegro: (:HOST NIL :DEVICE :UNSPECIFIC :DIRECTORY (:RELATIVE) :NAME NIL :TYPE NIL :VERSION :UNSPECIFIC)
CMUCL: (:HOST "" :DEVICE NIL :DIRECTORY NIL :NAME "." :TYPE :UNSPECIFIC :VERSION NIL)
On Thu, Jan 7, 2016 at 10:43 AM, Raymond Toy toy.raymond@gmail.com wrote:
"Jared" == Jared C Davis jared.c.davis@gmail.com writes:
Jared> Hi, Jared> Should I be able to expect the following to behave consistently across Lisps? Jared> (file-namestring (uiop:parse-native-namestring ".")) Jared> I find that: Jared> - CCL and SBCL produce "." Jared> - Allegro produces NIL Jared> - CMUCL signals an error in LISP::UNPARSE-UNIX-FILE Jared> If I just look at: Jared> (uiop:parse-native-namestring ".") Jared> I get: Jared> Allegro: #P"./" Jared> CCL: #P"." Jared> SBCL: #P"." Jared> CMUCL: #P(:NAME "." :TYPE :UNSPECIFIC)I wonder why uiop:parse-native-namestring does that on cmucl. (cl:parse-namestring ".") returns #p"./", which, I think, makes sense.
Without examining the actual slots, it's hard to tell what #p"." really is.
-- Ray