From: Pascal B. <pj...@in...> - 2003-06-12 17:17:03
|
I cannot find anything in CLHS that prevents: (make-pathname :directory '(:absolute :wild)) (or any of its variants: =20 (make-pathname :directory '(:relative :wild)) (make-pathname :directory '(:absolute "a" :wild "b")) (make-pathname :directory '(:relative "a" :wild "b")) ) but clisp does not accept it: [pascal@thalassa pascal]$ clisp -q -norc [1]> (make-pathname :directory '(:absolute :wild)) *** - MAKE-PATHNAME: illegal :DIRECTORY argument (:ABSOLUTE :WILD) 1. Break [2]>=20 [3]> (make-pathname :directory '(:relative :wild)) *** - MAKE-PATHNAME: illegal :DIRECTORY argument (:RELATIVE :WILD) 1. Break [4]>=20 [5]> (make-pathname :directory '(:absolute "a" :wild "b")) *** - MAKE-PATHNAME: illegal :DIRECTORY argument (:ABSOLUTE "a" :WILD "b"= ) 1. Break [6]>=20 [7]> (make-pathname :directory '(:relative "a" :wild "b")) *** - MAKE-PATHNAME: illegal :DIRECTORY argument (:RELATIVE "a" :WILD "b"= ) 1. Break [8]>=20 [9]> (lisp-implementation-version) "2.30 (released 2002-09-15) (built on thalassa.informatimago.com [213.220= .35.225])" Note that PATHNAME does not have that same reticence: [14]> (pathname "/*/") #P"/*/" [15]> (pathname "/a/*/b/") #P"/a/*/b/" [16]> (pathname "a/*/b/") #P"a/*/b/" [17]> (pathname "*/") #P"*/" [18]>=20 MAKE-PATHNAME takes a "valid pathname directory": valid pathname directory n. a string, a list of strings, nil, :wild, :unspecific, or some other object defined by the implementation to be a valid directory component. --=20 __Pascal_Bourguignon__ http://www.informatimago.com/ ---------------------------------------------------------------------- Do not adjust your mind, there is a fault in reality. |