------- Comment #18 from dominiq at lps dot ens dot fr 2007-11-13 15:58 -------
At revision 130137 the minimal flags are:
[ibook-dhum] f90/bug% gfc -O1 -funroll-loops -fschedule-insns -fregmove
-fexpensive-optimizations -fforward-propagate
char_cshift_2_red_1.f90[ibook-dhum] f90/bug% a.out
test 2
'adf' 'acf' 'adf' 1 1 2 1
'bdf' 'bcf' 'bdf' 2 1 2 1
'aef' 'adf' 'aef' 1 2 3 1
'bef' 'bdf' 'bef' 2 2 3 1
'acf' 'aef' 'acf' 1 3 1 1
'bcf' 'bef' 'bcf' 2 3 1 1
Abort
[ibook-dhum] f90/bug% gfc -O1 -funroll-loops -fregmove
-fexpensive-optimizations -fforward-propagate char_cshift_2_red_1.f90
[ibook-dhum] f90/bug% a.out
test 2
'bdf' 'bcf' 'bdf' 2 1 2 1
'bef' 'bdf' 'bef' 2 2 3 1
'bcf' 'bef' 'bcf' 2 3 1 1
Abort
where the printed lines come from
print *, "'", a (i1, i2p, i3), "' '", b (i1, i2, i3), "' '", b
(i1, i2p, i3), "'", i1, i2, i2p, i3
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34067
