I reported a related problem some time ago<div>   <a href="http://lists.common-lisp.net/pipermail/cl-ppcre-devel/2011-January/000706.html">http://lists.common-lisp.net/pipermail/cl-ppcre-devel/2011-January/000706.html</a></div>

<div><br></div><div>However, instead of the values I supplied now cl-unicode is using :unspecific for the :type of a pathname.</div><div><div><br></div><div><font class="Apple-style-span" face="'courier new', monospace">(defun dump-derived-tests ()</font></div>

<div><font class="Apple-style-span" face="'courier new', monospace">  "Parses the Unicode data file \"DerivedCoreProperties.txt\" \(which</font></div><div><font class="Apple-style-span" face="'courier new', monospace">is not used in read.lisp) and uses it to create a file</font></div>

<div><font class="Apple-style-span" face="'courier new', monospace">\"derived-properties\" which will be used by CL-UNICODE-TEST."</font></div><div><font class="Apple-style-span" face="'courier new', monospace">  (with-output-to-source-file (out (make-pathname :name "derived-properties"</font></div>

<div><font class="Apple-style-span" face="'courier new', monospace">                                                  :type :unspecific</font></div><div><font class="Apple-style-span" face="'courier new', monospace">                                                  :directory '(:relative :up "test"))</font></div>

<div><font class="Apple-style-span" face="'courier new', monospace">                                   :no-header-p t)</font></div></div><div><br></div><div>This is not supported by ECL, which uses NIL to represent an unfilled value (absent therefore). From the Hyperspec</div>

<div><br></div><div><a href="http://www.lispworks.com/documentation/HyperSpec/Body/19_bbbc.htm">http://www.lispworks.com/documentation/HyperSpec/Body/19_bbbc.htm</a></div><blockquote class="webkit-indent-blockquote" style="margin: 0 0 0 40px; border: none; padding: 0px;">

A conforming program must never unconditionally use a :unspecific as the value of a pathname component because such a value is not guaranteed to be permissible in all implementations.<br></blockquote><div><br></div><div>
Probably what you want to solve is the merge-pathnames above the code (in the macro), which might instead read</div>
<div><br></div><div><div><font class="Apple-style-span" face="'courier new', monospace">  `(let* ((directory (make-pathname :name nil :type nil :version nil :defaults *this-file*))</font></div><div><font class="Apple-style-span" face="'courier new', monospace">          (pathname (merge-pathnames ,relative-path directory))</font></div>

</div><div><br></div><div>Cheers,</div><div><br></div><div>Juanjo</div><div><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://juanjose.garciaripoll.googlepages.com" target="_blank">http://juanjose.garciaripoll.googlepages.com</a><br>


</div>