[Openmcl-devel] [openmcl 1.1 6/8/06] Problem with fixnum arrays

Gary Byers gb at clozure.com
Wed Jun 21 19:01:49 UTC 2006


Thanks; I'll try to fix these bugs (and package new 1.1-pre snapshots) in
the next day or so.

On Wed, 21 Jun 2006, Erik Pearson wrote:

> Hi,
>
> Using openmcl 1.1 on OSX 10.4.6 and have encountered a problem with
> fixnum arrays.
>
> ? (defun test () (make-array 10 :element-type 'fixnum :initial-
> element 1))
> TEST
> ? (test)
> #(16843009 16843009 16843009 0 0 0 0 0 0 0)
>
>
> ? (defun test () (make-array 10 :element-type 'integer :initial-
> element 0))
> TEST
> ? (test)
> #(0 0 0 0 0 0 0 0 0 0)
>
> but this works:
>
> ? (make-array 10 :element-type 'fixnum :initial-element 1)
> #(1 1 1 1 1 1 1 1 1 1)
>
> I did see in release-notes.txt that there is a new array of fixnum type.
>
>
> A related error in 1.1 is that I can't set an initial element of -1
>
> ? (make-array 10 :element-type 'fixnum :initial-element -1)
> #(-1 -1 -1 -1 -1 -1 -1 -1 -1 -1)
> ? (defun test () (make-array 10 :element-type 'fixnum :initial-
> element -1))
> TEST
> ? (test)
> > Error: -1 doesn't match array element type of #<VECTOR 10 type
> FIXNUM, simple>.
> > While executing: CCL::%INIT-MISC, in process listener(1).
> > Type :POP to abort, :R for a list of available restarts.
> > Type :? for other options.
> 1 >
>
> Which does work on 1.0
>
> I updated the 1.1 from cvs and rebuilt, with no change in behavior.
>
> Thanks,
> Erik.
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>
>



More information about the Openmcl-devel mailing list