------- Comment #16 from dominiq at lps dot ens dot fr 2007-08-01 21:19 -------
As far as I can tell, I have applied correctly your latest patch. But the
following reduced test
! { dg-do run }
! Transformational functions for zero-sized array and array sections
! Contributed by Francois-Xavier Coudert <[EMAIL PROTECTED]>
integer,allocatable :: foo(:,:)
allocate(foo(0,1:7))
foo = 1
if (size(pack(foo,foo/=0,(/1,3,4,5,1,0,7,9/))) /= 8 ) call abort
deallocate(foo)
end
gives a "Bus error" with -fdefault-integer-8.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32954
