[Openmcl-devel] defclass initform issue

[Gail Zacharias]

At 11/26/2008 07:51 AM, Zach Beane wrote:
>I didn't expect the following result:
>
>   ? (defclass foo ()
>       ((data
>         :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?


In CCL.  Should be fixed in the trunk now.



>Zach
>_______________________________________________
>Openmcl-devel mailing list
>Openmcl-devel at clozure.com
>http://clozure.com/mailman/listinfo/openmcl-devel