diff options
Diffstat (limited to 'libgfortran/generated/pow_r8_i8.c')
-rw-r--r-- | libgfortran/generated/pow_r8_i8.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/libgfortran/generated/pow_r8_i8.c b/libgfortran/generated/pow_r8_i8.c index 7f75c82f79b..e922eef8b45 100644 --- a/libgfortran/generated/pow_r8_i8.c +++ b/libgfortran/generated/pow_r8_i8.c @@ -22,13 +22,16 @@ Boston, MA 02111-1307, USA. */ #include "config.h" #include "libgfortran.h" -/* Uuse Binary Method to calculate the powi. This is not an optimal but +/* Use Binary Method to calculate the powi. This is not an optimal but a simple and reasonable arithmetic. See section 4.6.3, "Evaluation of Powers" of Donald E. Knuth, "Seminumerical Algorithms", Vol. 2, "The Art of Computer Programming", 3rd Edition, 1998. */ +GFC_REAL_8 pow_r8_i8 (GFC_REAL_8 a, GFC_INTEGER_8 b); +export_proto(pow_r8_i8); + GFC_REAL_8 -prefix(pow_r8_i8) (GFC_REAL_8 a, GFC_INTEGER_8 b) +pow_r8_i8 (GFC_REAL_8 a, GFC_INTEGER_8 b) { GFC_REAL_8 pow, x; GFC_INTEGER_8 n, u; |