======================================== lolevel tests ...

old: "\x00yo"
new: "oy\x00"

old: #(yo 1 2 #f #t (1 2 3) #(1 2 3))
new: #(#(1 2 3) (1 2 3) #t #f 2 1 yo)

old: #u8(0 1 2 254 255)
new: #u8(255 254 2 1 0)

old: #s8(-128 -127 -2 -1 0 1 2 126 127)
new: #s8(127 126 2 1 0 -1 -2 -127 -128)

old: #u16(0 1 2 65534 65535)
new: #u16(65535 65534 2 1 0)

old: #s16(-32768 -32767 -2 -1 0 1 2 32766 32767)
new: #s16(32767 32766 2 1 0 -1 -2 -32767 -32768)

old: #u32(0 1 2 4294967294 4294967295)
new: #u32(4294967295 4294967294 2 1 0)

Error: segmentation violation

        Call history:

        <eval>    (add1409 i408)
        <eval>    (=410 i408 5)
        <eval>    (make-locative413 old405 i408)
        <eval>    (make-locative413 new406 (|-415| 5 i408 1))                                                         
        <eval>    (|-415| 5 i408 1)
        <eval>    (locative?417 loc-src412)
        <eval>    (locative?417 loc-dst414)
        <eval>    (locative-set!418 loc-dst414 (locative-ref419 loc-src412))                                          
        <eval>    (locative-ref419 loc-src412)
        <eval>    (doloop424 (add1409 i408))
        <eval>    (add1409 i408)
        <eval>    (=410 i408 5)
        <eval>    (printf420 "\nold: ~S\nnew: ~S\n" old405 new406)                                                    
        <eval>    (eqv?421 (u32vector-ref old405 4) (u32vector-ref new406 0))                                         
        <eval>    (u32vector-ref old405 4)
        <eval>    (u32vector-ref new406 0)      <--
make: *** [rules.make:974: check] Error 70

old: "\x00yo"
new: "oy\x00"

old: #(yo 1 2 #f #t (1 2 3) #(1 2 3))
new: #(#(1 2 3) (1 2 3) #t #f 2 1 yo)

old: #u8(0 1 2 254 255)
new: #u8(255 254 2 1 0)

old: #s8(-128 -127 -2 -1 0 1 2 126 127)
new: #s8(127 126 2 1 0 -1 -2 -127 -128)

old: #u16(0 1 2 65534 65535)
new: #u16(65535 65534 2 1 0)

old: #s16(-32768 -32767 -2 -1 0 1 2 32766 32767)
new: #s16(32767 32766 2 1 0 -1 -2 -32767 -32768)

old: #u32(0 1 2 4294967294 4294967295)
new: #u32(4294967295 4294967294 2 1 0)

old: #s32(-2147483648 -2147483647 -2 -1 0 1 2 2147483646 2147483647)
new: #s32(2147483647 2147483646 2 1 0 -1 -2 -2147483647 -2147483648)

old: #u64(0 1 2 18446744073709551614 18446744073709551615)
new: #u64(18446744073709551615 18446744073709551614 2 1 0)

old: #s64(-9223372036854775808 -9223372036854775807 -2 -1 0 1 2 9223372036854775806 9223372036854775807)
new: #s64(9223372036854775807 9223372036854775806 2 1 0 -1 -2 -9223372036854775807 -9223372036854775808)

old: #f32(-inf.0 -2.0 -1.0 0.0 1.0 2.0 +inf.0)
new: #f32(+inf.0 2.0 1.0 0.0 -1.0 -2.0 -inf.0)

old: #f64(-1e+200 -2.0 -1.0 0.0 1.0 2.0 1e+200)
new: #f64(1e+200 2.0 1.0 0.0 -1.0 -2.0 -1e+200)
[panic] unrecoverable segmentation violation - execution terminated

...more...
lolevel-tests.scm:210: chicken.memory.representation#extend-procedure
lolevel-tests.scm:218: chicken.memory.representation#extended-procedure?
lolevel-tests.scm:222: chicken.memory.representation#procedure-data
lolevel-tests.scm:228: chicken.memory.representation#set-procedure-data!
lolevel-tests.scm:230: chicken.memory.representation#procedure-data
lolevel-tests.scm:240: chicken.memory.representation#block-ref
lolevel-tests.scm:244: chicken.memory.representation#number-of-slots
lolevel-tests.scm:250: chicken.platform#feature?
lolevel-tests.scm:254: chicken.memory.representation#make-record-instance
lolevel-tests.scm:266: chicken.memory.representation#record-instance-type
lolevel-tests.scm:270: chicken.memory.representation#record-instance-length
lolevel-tests.scm:276: chicken.memory.representation#record-instance-slot
lolevel-tests.scm:278: chicken.memory.representation#record-instance-slot-set!
lolevel-tests.scm:280: chicken.memory.representation#record-instance-slot
lolevel-tests.scm:284: chicken.memory.representation#record->vector
lolevel-tests.scm:292: chicken.memory.representation#object-become!     <--

#0  0x76ebcd08 in bignum_cmp_unsigned () from /home/kooda/coop/5.1.0rc1/lib/libchicken.so.11
#1  0x76ecdd00 in C_i_bignum_cmp () from /home/kooda/coop/5.1.0rc1/lib/libchicken.so.11
#2  0x76cb9284 in basic_eqvp () from /home/kooda/coop/5.1.0rc1/lib/libchicken.so.11
Backtrace stopped: previous frame identical to this frame (corrupt stack?)

old: "\x00yo�"
new: "�oy\x00"

old: #(yo 1 2 #f #t (1 2 3) #(1 2 3))
new: #(#(1 2 3) (1 2 3) #t #f 2 1 yo)

old: #u8(0 1 2 254 255)
new: #u8(255 254 2 1 0)

old: #s8(-128 -127 -2 -1 0 1 2 126 127)
new: #s8(127 126 2 1 0 -1 -2 -127 -128)

old: #u16(0 1 2 65534 65535)
new: #u16(65535 65534 2 1 0)

old: #s16(-32768 -32767 -2 -1 0 1 2 32766 32767)
new: #s16(32767 32766 2 1 0 -1 -2 -32767 -32768)

old: #u32(0 1 2 4294967294 4294967295)
new: #u32(4294967295 4294967294 2 1 0)

old: #s32(-2147483648 -2147483647 -2 -1 0 1 2 2147483646 2147483647)
new: #s32(2147483647 2147483646 2 1 0 -1 -2 -2147483647 -2147483648)

old: #u64(0 1 2 18446744073709551614 18446744073709551615)
new: #u64(18446744073709551615 18446744073709551614 2 1 0)

old: #s64(-9223372036854775808 -9223372036854775807 -2 -1 0 1 2 9223372036854775806 9223372036854775807)
new: #s64(9223372036854775807 9223372036854775806 2 1 0 -1 -2 -9223372036854775807 -9223372036854775808)

old: #f32(-inf.0 -2.0 -1.0 0.0 1.0 2.0 +inf.0)
new: #f32(+inf.0 2.0 1.0 0.0 -1.0 -2.0 -inf.0)

old: #f64(-1e+200 -2.0 -1.0 0.0 1.0 2.0 1e+200)
new: #f64(1e+200 2.0 1.0 0.0 -1.0 -2.0 -1e+200)
[panic] Detected corrupted data in heap - execution terminated

...more...
lolevel-tests.scm:210: chicken.memory.representation#extend-procedure
lolevel-tests.scm:218: chicken.memory.representation#extended-procedure?
lolevel-tests.scm:222: chicken.memory.representation#procedure-data
lolevel-tests.scm:228: chicken.memory.representation#set-procedure-data!
lolevel-tests.scm:230: chicken.memory.representation#procedure-data
lolevel-tests.scm:240: chicken.memory.representation#block-ref
lolevel-tests.scm:244: chicken.memory.representation#number-of-slots
lolevel-tests.scm:250: chicken.platform#feature?
lolevel-tests.scm:254: chicken.memory.representation#make-record-instance
lolevel-tests.scm:266: chicken.memory.representation#record-instance-type
lolevel-tests.scm:270: chicken.memory.representation#record-instance-length
lolevel-tests.scm:276: chicken.memory.representation#record-instance-slot
lolevel-tests.scm:278: chicken.memory.representation#record-instance-slot-set!
lolevel-tests.scm:280: chicken.memory.representation#record-instance-slot
lolevel-tests.scm:284: chicken.memory.representation#record->vector
lolevel-tests.scm:292: chicken.memory.representation#object-become!     <--

==6470== Memcheck, a memory error detector
==6470== Copyright (C) 2002-2017, and GNU GPL'd, by Julian Seward et al.
==6470== Using Valgrind-3.15.0 and LibVEX; rerun with -h for copyright info
==6470== Command: /home/kooda/coop/master/bin/csi -s tests/lolevel-tests.scm
==6470==

old: "\x00yo"
new: "oy\x00"

old: #(yo 1 2 #f #t (1 2 3) #(1 2 3))
new: #(#(1 2 3) (1 2 3) #t #f 2 1 yo)

old: #u8(0 1 2 254 255)
new: #u8(255 254 2 1 0)

old: #s8(-128 -127 -2 -1 0 1 2 126 127)
new: #s8(127 126 2 1 0 -1 -2 -127 -128)

old: #u16(0 1 2 65534 65535)
new: #u16(65535 65534 2 1 0)

old: #s16(-32768 -32767 -2 -1 0 1 2 32766 32767)
new: #s16(32767 32766 2 1 0 -1 -2 -32767 -32768)

old: #u32(0 1 2 4294967294 4294967295)
new: #u32(4294967295 4294967294 2 1 0)
==6470== Invalid read of size 4
==6470==    at 0x4F905E0: bignum_cmp_unsigned (in /home/kooda/coop/master/lib/libchicken.so.11)
==6470==  Address 0x7e29ecf4 is not stack'd, malloc'd or (recently) free'd
==6470==
==6470== Invalid read of size 4
==6470==    at 0x4F905E4: bignum_cmp_unsigned (in /home/kooda/coop/master/lib/libchicken.so.11)
==6470==  Address 0x7e29ee94 is not stack'd, malloc'd or (recently) free'd
==6470==

Error: segmentation violation

        Call history:

        <eval>    (add1409 i408)
        <eval>    (=410 i408 5)
        <eval>    (make-locative413 old405 i408)
        <eval>    (make-locative413 new406 (|-415| 5 i408 1))
        <eval>    (|-415| 5 i408 1)
        <eval>    (locative?417 loc-src412)
        <eval>    (locative?417 loc-dst414)
        <eval>    (locative-set!418 loc-dst414 (locative-ref419 loc-src412))
        <eval>    (locative-ref419 loc-src412)
        <eval>    (doloop424 (add1409 i408))
        <eval>    (add1409 i408)
        <eval>    (=410 i408 5)
        <eval>    (printf420 "\nold: ~S\nnew: ~S\n" old405 new406)
        <eval>    (eqv?421 (u32vector-ref old405 4) (u32vector-ref new406 0))
        <eval>    (u32vector-ref old405 4)
        <eval>    (u32vector-ref new406 0)      <--
==6470==
==6470== HEAP SUMMARY:
==6470==     in use at exit: 922,255 bytes in 4,116 blocks
==6470==   total heap usage: 4,144 allocs, 28 frees, 1,184,846 bytes allocated
==6470==
==6470== LEAK SUMMARY:
==6470==    definitely lost: 0 bytes in 0 blocks
==6470==    indirectly lost: 0 bytes in 0 blocks
==6470==      possibly lost: 0 bytes in 0 blocks
==6470==    still reachable: 922,255 bytes in 4,116 blocks
==6470==         suppressed: 0 bytes in 0 blocks
==6470== Rerun with --leak-check=full to see details of leaked memory
==6470==
==6470== For lists of detected and suppressed errors, rerun with: -s
==6470== ERROR SUMMARY: 818813 errors from 2 contexts (suppressed: 0 from 0)

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

'/home/kooda/coop/master-debug/bin/chicken' 'BUG.scm' -output-file 'BUG.c' -verbose
'gcc' 'BUG.c' -o 'BUG.o' -c  -fno-strict-aliasing -fwrapv -DHAVE_CHICKEN_CONFIG_H -DC_ENABLE_PTABLES -g -Wall -Wno-unused -I/home/kooda/coop/master-debug/include/chicken
'gcc' 'BUG.o' -o 'BUG' -L/home/kooda/coop/master-debug/lib -Wl,-R/home/kooda/coop/master-debug/lib -lchicken -lm -ldl