[closure-cvs] CVS closure/src/glisp

[emarsden]

Update of /project/closure/cvsroot/closure/src/glisp
In directory clnet:/tmp/cvs-serv10739/src/glisp

Modified Files:
	dep-sbcl.lisp 
Log Message:
Use character instead of base-char for GLISP strings (base-char is
only 7 bits wide in Unicode-enabled SBCL builds). 


--- /project/closure/cvsroot/closure/src/glisp/dep-sbcl.lisp	2005/03/13 18:01:15	1.2
+++ /project/closure/cvsroot/closure/src/glisp/dep-sbcl.lisp	2006/12/30 15:00:28	1.3
@@ -91,7 +91,7 @@
 ;;;;;;
 
 (defun glisp::g/make-string (length &rest options)
-  (apply #'make-array length :element-type 'base-char options))
+  (apply #'make-array length :element-type 'character options))