search

ashinn / chibi-scheme

Official chibi-scheme repository
Other
1.2k stars 142 forks source link

SRFI 231: array-packed? on empty arrays #959

Closed gambiteer closed 2 months ago

gambiteer commented 2 months ago

This extracted array is empty, so it's elements are in order, but

> 
(array-packed?
 (array-extract
  (make-specialized-array (make-interval '#(6 -6 9)
                                         '#(7 -2 13)))
  (make-interval '#(7 -4 11)
                 '#(7 -2 13))))
#f

However

> 
(array-packed?
 (make-specialized-array (make-interval '#(7 -4 11)
                                        '#(7 -2 13))))
#t
gambiteer commented 2 months ago

This may be the same issue

> 
(array-packed?
 (array-reverse
  (make-specialized-array (make-interval '#(-5 2 -4)
                                         '#(-2 8 -4)))
  '#(#t #t #f)))