diff options
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/f95-lang.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 4d0b330..7eb4fb5 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2004-08-06 Feng Wang <fengwang@nudt.edu.cn> + + * f95-lang.c (gfc_init_builtin_functions): Fix the number of + __builtin_pow[f] arguments. + 2004-08-06 Steven G. Kargl <kargls@comcast.net> * arith.c: Add #define for model numbers. Remove global GMP variables. diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c index 3afeb66..78bf19a 100644 --- a/gcc/fortran/f95-lang.c +++ b/gcc/fortran/f95-lang.c @@ -750,9 +750,9 @@ gfc_init_builtin_functions (void) BUILT_IN_ROUNDF, "roundf", true); /* These are used to implement the ** operator. */ - gfc_define_builtin ("__builtin_pow", mfunc_double[0], + gfc_define_builtin ("__builtin_pow", mfunc_double[1], BUILT_IN_POW, "pow", true); - gfc_define_builtin ("__builtin_powf", mfunc_float[0], + gfc_define_builtin ("__builtin_powf", mfunc_float[1], BUILT_IN_POWF, "powf", true); /* Other builtin functions we use. */ |