I tested this on SBCL 1.0.23 x86 and it runs without problems.

karol skocik wrote:
  I have filed a bug here: https://bugs.launchpad.net/sbcl/+bug/353861
but I was advised to first post bug here.
I have found a case where SBCL segfaults quite reliably:

;; this is iota from alexandria
(defun iota (n &key (start 0) (step 1))
  (declare (type (integer 0) n) (number start step))
  (loop repeat n
     for i = (+ start (- step step)) then (+ i step)
     collect i))

(defun test-iota (n)
  (flet ((thread-fn ()
           (loop (sleep 0.01)
              (make-array 100 :initial-contents (iota 100)))))
    (loop :repeat n
       :collect (sb-thread:make-thread #'thread-fn))))

First, run (test-iota 10), then in repl:

(loop :repeat 100 :do (room))

What's interesting is that it does not crash without
":initial-contents (iota 100)" in make-array in thread-fn.

This is on x86-64, linux, SBCL 1.0.26

I can confirm that it segfaults on x86 as well.

Karol Skocik

Sbcl-devel mailing list