Re: #1637: Build fails on Debian/armel

[Chicken Trac]

#1637: Build fails on Debian/armel
-----------------------------------------+--------------------
            Reporter:  felix winkelmann  |      Owner:  (none)
                Type:  defect            |     Status:  new
            Priority:  critical          |  Milestone:  5.2
           Component:  core libraries    |    Version:  5.1.0
          Resolution:                    |   Keywords:
Estimated difficulty:  medium            |
-----------------------------------------+--------------------

Comment (by Kooda):

 This (smaller) test case triggers the segfault:

 {{{
 (import chicken.locative chicken.gc srfi-4)

 (define old (u32vector 0 1 2 4294967294 4294967295))

 (define new (make-u32vector 5))

 (do ((i 0 (add1 i)))
      ((= i 5))
   (let ((loc-src (make-locative old i))
         (loc-dst (make-locative new (- 5 i 1))))
     (locative-set! loc-dst (locative-ref loc-src))))

 (assert (eqv? (u32vector-ref old 4) (u32vector-ref new 0)))

 (gc #t)
 }}}

-- 
Ticket URL: <https://bugs.call-cc.org/ticket/1637#comment:5>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.