[Bug fortran/57071] Optimize (-1)**k to 1 - 2 * mod(K, 2)

[tkoenig at gcc dot gnu.org]

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



--- Comment #10 from Thomas Koenig <tkoenig at gcc dot gnu.org> 2013-04-30 
21:46:11 UTC ---





Author: tkoenig

Date: Tue Apr 30 21:45:13 2013

New Revision: 198476



URL: http://gcc.gnu.org/viewcvs?rev=198476&root=gcc&view=rev

Log:

2013-04-30  Thomas Koenig  <tkoe...@gcc.gnu.org>



    PR fortran/57071

    * frontend-passes.c (optimize_power):  Simplify

    1**k to 1.



2013-04-30  Thomas Koenig  <tkoe...@gcc.gnu.org>



    PR fortran/57071

    * gfortran.dg/power_5.f90:  New test.





Added:

    trunk/gcc/testsuite/gfortran.dg/power_5.f90

Modified:

    trunk/gcc/fortran/ChangeLog

    trunk/gcc/fortran/frontend-passes.c

    trunk/gcc/testsuite/ChangeLog