Custom Query (1030 matches)

Welcome to Clozure Common Lisp Version 1.3-dev-r11220M  (LinuxX8632)!
? (let ((a (make-array (list 100 100 100)))) (aref a 3 3 3))
Program received signal SIGTRAP, Trace/breakpoint trap.
[Switching to Thread 0xb7c13b90 (LWP 10379)]
0x080560c9 in ?? ()
1: x/i $pc
0x80560c9:	lea    0x0(%esi,%eiz,1),%esi
Current language:  auto; currently asm
(gdb) bt
#0  0x080560c9 in ?? ()
#1  0x08053345 in _SPFret1valn () at ../x86-spentry32.s:928
#2  0x1434f755 in ?? ()
#3  0x14920406 in ?? ()
#4  0xb7aaedd8 in ?? ()
#5  0x00000004 in ?? ()
#6  0xfffffffc in ?? ()
#7  0xb7aaee10 in ?? ()
#8  0x00000004 in ?? ()
#9  0x00000000 in ?? ()

Running on 32-bit Linux.

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).