http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57073



--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> 2013-04-28 
22:03:35 UTC ---

Created attachment 29968

  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=29968

patch that fails



The patch in the attachment fails with the test

case



program main

  integer :: i

  real(8) :: a

  a = -1.0_8

  read (*,*) i

  print *,(-1.0_8)**i,a**i

end program main



gfortran -O foo.f90

foo.f90: In function 'MAIN__':

foo.f90:6:0: internal compiler error: in gimplify_modify_expr, at

gimplify.c:4941

   print *,(-1.0_8)**i,a**i

 ^

0x7fbc17 gimplify_modify_expr

        ../../trunk/gcc/gimplify.c:4941

0x7f0211 gimplify_expr(tree_node**, gimple_statement_d**, gimple_statement_d**,

bool (*)(tree_node*), int)

        ../../trunk/gcc/gimplify.c:7156



I wonder why.

Reply via email to