[Openmcl-devel] defclass initform issue
xach at xach.com
Wed Nov 26 12:58:03 UTC 2008
On Wed, Nov 26, 2008 at 07:51:22AM -0500, Zach Beane wrote:
> I didn't expect the following result:
> ? (defclass foo ()
> :initform (make-array 1
> :element-type '(signed-byte 16)
> :initial-element -1))))
> #<STANDARD-CLASS FOO>
> ? (make-instance 'foo)
> > Error: value -1 is not of the expected type (UNSIGNED-BYTE 16).
> Startup says:
> Welcome to Clozure Common Lisp Version 1.2-r10552 (LinuxX8664)!
> Is that a bug in CCL, or in my expectations?
I can simplify:
? (funcall (lambda () (make-array 1 :element-type '(signed-byte 16)
> Error: value -1 is not of the expected type (UNSIGNED-BYTE 16).
More information about the Openmcl-devel