This patch seems to fix everything and let cl-unicode build with ECL<div><br></div><div><div>--- dump-orig.lisp<span class="Apple-tab-span" style="white-space:pre">	</span>2011-01-12 22:37:54.000000000 +0100</div><div>+++ dump.lisp<span class="Apple-tab-span" style="white-space:pre">	</span>2011-01-12 22:32:17.000000000 +0100</div>

<div>@@ -105,7 +105,8 @@</div><div> writes to the file denoted by RELATIVE-PATH - a path relative to the</div><div> location of this source file.  Writes a Lisp header to the files</div><div> unless NO-HEADER-P is true.&quot;</div>

<div>-  `(let ((pathname (merge-pathnames ,relative-path *this-file*)))</div><div>+  `(let ((pathname (merge-pathnames ,relative-path</div><div>+                                    (make-pathname :name nil :type nil *this-file*))))</div>

<div>      (format t &quot;~&amp;;;; Writing source file ~A&quot; (file-namestring pathname))</div><div>      (force-output)</div><div>      (with-open-file (,stream pathname</div><div><br></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>