Re: [cl-ppcre-devel] Problem with pathnames

This patch seems to fix everything and let cl-unicode build with ECL

--- dump-orig.lisp 2011-01-12 22:37:54.000000000 +0100 +++ dump.lisp 2011-01-12 22:32:17.000000000 +0100 @@ -105,7 +105,8 @@ writes to the file denoted by RELATIVE-PATH - a path relative to the location of this source file. Writes a Lisp header to the files unless NO-HEADER-P is true." - `(let ((pathname (merge-pathnames ,relative-path *this-file*))) + `(let ((pathname (merge-pathnames ,relative-path + (make-pathname :name nil :type nil *this-file*)))) (format t "~&;;; Writing source file ~A" (file-namestring pathname)) (force-output) (with-open-file (,stream pathname