re PR fortran/57071 (Optimize (-1)**k to 1 - 2 * mod(K, 2))
authorThomas Koenig <tkoenig@gcc.gnu.org>
Tue, 30 Apr 2013 21:45:13 +0000 (21:45 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Tue, 30 Apr 2013 21:45:13 +0000 (21:45 +0000)
commit068b04fe4cd176294f6110c6dca28d24e65d6121
treeefd1bbd12f3f9ffed58a0089a798e89c2ca28db9
parentdc4ea06f6aaf6d964b8ef74be45a9e79c2f1f805
re PR fortran/57071 (Optimize  (-1)**k  to 1 - 2 * mod(K, 2))

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

PR fortran/57071
* frontend-passes.c (optimize_power):  Simplify
1**k to 1.

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

PR fortran/57071
* gfortran.dg/power_5.f90:  New test.

From-SVN: r198476
gcc/fortran/ChangeLog
gcc/fortran/frontend-passes.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/power_5.f90 [new file with mode: 0644]