Custom Query (1030 matches)

It should.

(See also ticket:87)

Even though arrays/vectors with element-type FIXNUM have existed in OpenMCL for over a year, neither COMPILE-FILE nor the fasl loader have any support for dumping/loading them when they appear as constants. The big ETYPECASE in FASL-DUMP-DISPATCH misses them and falls into a clause which tries to dump them as GVECTORs; whether that "works" or not depends on how the bits in the vector are (mis)interpreted as tagged objects, as in the example below.

(defconstant *matrix*
  (let ((matrix (make-array '(80) :element-type 'fixnum)))
    (dotimes (i 80 matrix)
      (setf (aref matrix i) (random 1000)))))

 (defun problem81 ()
  (let ((j 50))
    ;;(aref *matrix* 50) ; no problem
    (aref *matrix* j)   ; bad
    ))

It was reported (by David Brown on Feb 10,2008} that the following code crashes

(let ((shared1 (make-array 8 :element-type '(unsigned-byte 8)))
       (shared2 (make-array 8 :element-type '(unsigned-byte 8))))
   (ccl:with-pointer-to-ivector (%shared1 shared1)
     (ccl:with-pointer-to-ivector (%shared2 shared2)
       (%stack-block ((stacky 8))
         (format t "~A~%~A~%~A~%" %shared1 %shared2 stacky)))))

This should have been fixed in recent checkins, but a test case for the bug is here for the record.