From: Douglas K. <sn...@us...> - 2015-08-14 03:44:06
|
The branch "master" has been updated in SBCL: via 792375579b24b9b38aa7726c3e28004479d98b1e (commit) from 4ba0bf98da26e34b0307ce8b161da484295a3f00 (commit) - Log ----------------------------------------------------------------- commit 792375579b24b9b38aa7726c3e28004479d98b1e Author: Douglas Katzman <do...@go...> Date: Thu Aug 13 23:40:54 2015 -0400 Stop displaying Unicode character names during build. --- tools-for-build/ucd.lisp | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) diff --git a/tools-for-build/ucd.lisp b/tools-for-build/ucd.lisp index 255604f..fa3a0d1 100644 --- a/tools-for-build/ucd.lisp +++ b/tools-for-build/ucd.lisp @@ -450,6 +450,7 @@ Length should be adjusted when the standard changes.") (line-break-index (gethash code-point *line-break-class-table* 0)) (age-index (gethash code-point *age-table* 0)) decomposition) + #+nil (when (and (not cl-both-case-p) (< gc-index 2)) (format t "~A~%" name)) @@ -599,6 +600,7 @@ Length should be adjusted when the standard changes.") :type "txt" :defaults *unicode-character-database*) :direction :input) + (format t "~%//slurp-ucd~%") (loop for line = (read-line nil nil) while line do (slurp-ucd-line line))) ----------------------------------------------------------------------- hooks/post-receive -- SBCL |