[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gcl-devel] pathname-directory and other pathname issues

From: Raymond Toy
Subject: [Gcl-devel] pathname-directory and other pathname issues
Date: Thu, 04 Jan 2007 00:44:01 -0500
User-agent: Thunderbird (Macintosh/20061207)

Consider the following:

(pathname-directory #p"/abc/def/g.lsp") -> (:root "abc" "def")
(pathname-directory #p"abc/g.lsp") -> ("abc")
(make-pathname :directory '(:absolute "a")) -> #p"ABSOLUTE/a"
(make-pathname :directory '(:relative "a")) -> #p"RELATIVE/a"
(make-pathname :directory '(:root "a" :wild-inferiors)) ->

These are all wrong.  The answers should be
(:absolute "abc" "def")
(:relative "abc")
#p"/a/" (or #p"/a")
#p"a" (or #p"a/")
#p/a/**" (or #p"/a/**/")

Also, in gcl 2.4 #p"abc/g.lsp" had a pathname-directory of (:current
"abc"), which is closer to what it should be.

I didn't try it, but perhaps changing sKroot to make_keyword("ABSOLUTE")
and sKcurrent to make_keyword("RELATIVE") would fix some of the issues.

Perhaps gcl doesn't support :wild-inferiors?


reply via email to

[Prev in Thread] Current Thread [Next in Thread]