diff options
| author | Janne Blomqvist <jb@gcc.gnu.org> | 2007-07-01 19:24:38 +0300 |
|---|---|---|
| committer | Janne Blomqvist <jb@gcc.gnu.org> | 2007-07-01 19:24:38 +0300 |
| commit | 31c97dfe34220de54c1d93ce858af83bfda31fd3 (patch) | |
| tree | 15fabe5c15ab032733629223977c9d3590761024 /gcc/fortran/f95-lang.c | |
| parent | c7b6844eb5412f068bbb097d4129fbc5181a3d67 (diff) | |
| download | gcc-31c97dfe34220de54c1d93ce858af83bfda31fd3.zip gcc-31c97dfe34220de54c1d93ce858af83bfda31fd3.tar.gz gcc-31c97dfe34220de54c1d93ce858af83bfda31fd3.tar.bz2 | |
re PR fortran/32239 (optimize power in loops, use __builtin_powi instead of _gfortran_pow_r4_i4)
gcc/fortran:
2007-07-01 Janne Blomqvist <jb@gcc.gnu.org>
PR fortran/32239
* trans-expr.c (gfc_conv_power_op): Use builtin_powi for
real**int4 powers.
* f95-lang.c (gfc_init_builtin_functions): Add builtin_powi to the
builtins table.
libgfortran:
2007-07-01 Janne Blomqvist <jb@gcc.gnu.org>
PR fortran/32239
* Makefile.am: Don't generate real**int4 pow functions.
* gfortran.map: Remove real**int4 pow symbols.
* Makefile.in: Regenerated.
testsuite
2007-07-01 Janne Blomqvist <jb@gcc.gnu.org>
PR fortran/32239
* gfortran.fortran-torture/execute/intrinsic_fraction_exponent.f90
(test_4): Use proper test for floating point equality.
(test_8): Likewise.
From-SVN: r126175
Diffstat (limited to 'gcc/fortran/f95-lang.c')
| -rw-r--r-- | gcc/fortran/f95-lang.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c index 558ba0c..314fc37 100644 --- a/gcc/fortran/f95-lang.c +++ b/gcc/fortran/f95-lang.c @@ -950,6 +950,13 @@ gfc_init_builtin_functions (void) BUILT_IN_POW, "pow", true); gfc_define_builtin ("__builtin_powf", mfunc_float[1], BUILT_IN_POWF, "powf", true); + gfc_define_builtin ("__builtin_powil", mfunc_longdouble[2], + BUILT_IN_POWIL, "powil", true); + gfc_define_builtin ("__builtin_powi", mfunc_double[2], + BUILT_IN_POWI, "powi", true); + gfc_define_builtin ("__builtin_powif", mfunc_float[2], + BUILT_IN_POWIF, "powif", true); + if (TARGET_C99_FUNCTIONS) { |