Custom Query (1030 matches)

Apparent code generation bug in the 32-bit port (on Linux).

(defun foo (a)
  (declare (type (simple-array single-float (10)) a))
  (setf (aref a 0) (aref a 1)))

> Error: Unknown vinsn: CCL::SINGLE-FLOAT-BITS
> While executing: CCL::NEED-VINSN-TEMPLATE, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.

32-bit Clozure CL on Linux.

(defun foo (a i j k)
  (declare (type (simple-array single-float (10)) a))
  (setf (aref a i) (aref a j))
  (setf (aref a i) (aref a k)))

> Error: Unknown vinsn: CCL::MISC-SET-SINGLE-FLOAT
> While executing: CCL::NEED-VINSN-TEMPLATE, in process listener(1).

Welcome to Clozure Common Lisp Version 1.3-dev-r11066M-trunk  (DarwinX8632)!
? (heap-utilization)
> Error: value #<BOGUS object @ #x1200F> is not of the expected type UVECTOR.
> While executing: (:INTERNAL HEAP-UTILIZATION), in process listener(1).

Same story on Linux.