projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
message
[sbcl.git]
/
tools-for-build
/
ucd.lisp
diff --git
a/tools-for-build/ucd.lisp
b/tools-for-build/ucd.lisp
index
18c7714
..
4ecfdbb
100644
(file)
--- a/
tools-for-build/ucd.lisp
+++ b/
tools-for-build/ucd.lisp
@@
-5,7
+5,7
@@
(defparameter *output-directory*
(merge-pathnames
(make-pathname :directory '(:relative :up "output"))
(defparameter *output-directory*
(merge-pathnames
(make-pathname :directory '(:relative :up "output"))
- (make-pathname :directory (pathname-directory *load-pathname*))))
+ (make-pathname :directory (pathname-directory *load-truename*))))
(defparameter *page-size-exponent* 8)
(defparameter *page-size-exponent* 8)
@@
-18,7
+18,7
@@
;;; Generator
(defparameter *unicode-character-database*
;;; Generator
(defparameter *unicode-character-database*
- (make-pathname :directory (pathname-directory *load-pathname*)))
+ (make-pathname :directory (pathname-directory *load-truename*)))
(defparameter *ucd-base* nil)
(defparameter *ucd-base* nil)