diff options
| author | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-03-29 20:33:07 +0000 |
|---|---|---|
| committer | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-03-29 20:33:07 +0000 |
| commit | 786b9ac589d828273f7eb966c90fc35b1f24096e (patch) | |
| tree | bab65c93c89839c430906d03c8985425a749601b /gcc/rtlhooks.c | |
| parent | fd7f45411bfd5fd73c1ce6c33773f7cfa53c1042 (diff) | |
| download | gcc-786b9ac589d828273f7eb966c90fc35b1f24096e.tar.gz | |
2009-03-29 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/38823
* gfortran.dg/power1.f90: New test.
2009-03-29 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/38823
* gfortran.h: Add ARITH_PROHIBIT to arith enum.
expr.c (gfc_match_init_expr): Add global variable init_flag to
flag matching an initialization expression.
(check_intrinsic_op): Move no longer reachable error message to ...
* arith.c (arith_power): ... here. Remove gfc_ prefix in
gfc_arith_power. Use init_flag. Allow constant folding of x**y
when y is REAL or COMPLEX.
(eval_intrinsic): Remove restriction that y in x**y must be INTEGER
for constant folding.
* gfc_power: Update gfc_arith_power to arith_power
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@145261 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/rtlhooks.c')
0 files changed, 0 insertions, 0 deletions