Nathan Froyd <nfroyd@...> writes:
> Now with added tests! Passes all tests.
> +;;; ensure that we can dump and reload specialized arrays whose element
> +;;; size is smaller than a byte (caused a few problems circa SBCL
> +;;; 0.8.14.4)
> +(defvar *1-bit* (make-array 5 :element-type 'bit :initial-element 0))
> +(defvar *2-bit* (make-array 5 :element-type '(unsigned-byte 2) :initial-element 0))
> +(defvar *4-bit* (make-array 5 :element-type '(unsigned-byte 4) :initial-element 1))
"I do not think these tests test what you think they test". "Stop
Er. These forms test being able to dump a call to the function
MAKE-ARRAY with various combinations of arguments. I think to test
the dumper's ability to dump small arrays, you actually need to do
(defvar *2-bit* #.(make-array 5 :element-type '(mod 4) :initial-element 0))
so that the manifest object is dumped, rather than a compiled form to
construct an array.