* f95-lang.c (gfc_init_builtin_functions): Fix the number of

	__builtin_pow[f] arguments.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@85653 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 4d0b330..7eb4fb5 100644 (file)
--- 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 (file)
--- 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.  */