[mcclim-cvs] CVS mcclim/Experimental

[ahefner]

Update of /project/mcclim/cvsroot/mcclim/Experimental
In directory clnet:/tmp/cvs-serv29896

Modified Files:
	xpm.lisp 
Log Message:
Fix broken type declaration.



--- /project/mcclim/cvsroot/mcclim/Experimental/xpm.lisp	2006/12/17 20:00:13	1.3
+++ /project/mcclim/cvsroot/mcclim/Experimental/xpm.lisp	2006/12/19 01:53:15	1.4
@@ -159,7 +159,7 @@
 
 (deftype xpm-data-array () `(simple-array (unsigned-byte 8) 1))
 (deftype array-index ()
-  #-sbcl '#.(integer 0 #.array-dimension-limit)
+  #-sbcl '(integer 0 #.array-dimension-limit)
   #+sbcl 'sb-int:index)
 (deftype xpm-pixcode () `(unsigned-byte 24)) ; Bogus upper limit for speed.. =/