Missing 'make directory' for the generated files

This commit is contained in:
Juan Jose Garcia Ripoll 2009-01-09 15:11:24 +01:00
parent f4eb4dc68c
commit f8478fb5e9

View file

@ -14,7 +14,7 @@
(loop for entry in +all-mappings+
for name = (first entry)
for orig = (make-pathname :name name :type "BIN" :defaults "ext:encodings;")
for copy = (merge-pathnames "build:encodings;" orig)
for copy = (ensure-directories-exist (merge-pathnames "build:encodings;" orig))
do (progn
(unless (probe-file orig)
(let ((mapping (if (equalp name "JISX0208")