------- Comment #8 from jvdelisle at gcc dot gnu dot org 2008-01-28 08:44
-------
With this test program derived from the original test case and the patch,
gfortran compiles but does not get the results right:
module abuse_mod
implicit none
integer i
character(8), parameter :: HEX1 = '40490FDB'
integer(1), parameter :: MSKa1(len(HEX1)) = (/(i,i=1,len(HEX1))/)
integer(1), parameter :: ARR1(len(HEX1)) = (/( MSKa1(i), i=1,len(HEX1) )/)
end module abuse_mod
program test
use abuse_mod
print *, MSKa1
print *, ARR1
end program test
]$ gfc parameter_array_init_3.f90
$ ./a.out
1 2 3 4 5 6 7 8
1 1 1 1 1 1 1 1
$ ifort parameter_array_init_3.f90
$ ./a.out
1 2 3 4 5 6 7 8
1 2 3 4 5 6 7 8
Without the patch gfortran gives correct results on x86-64 and segfaults on
compilation on ppc64.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34828
