diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index d53329daae6f..98a1b3f577c1 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,10 @@ +2011-02-22 Tobias Burnus + Kai-Uwe Eckhardt + + PR libfortran/47830 + * intrinsics/c99_functions.c (roundl): Make C valid for + HAVE_NEXTAFTERL. + 2011-02-19 Jerry DeLisle PR libgfortran/47567 diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c index 8a9c2f1d525f..9ba5544a02b7 100644 --- a/libgfortran/intrinsics/c99_functions.c +++ b/libgfortran/intrinsics/c99_functions.c @@ -600,7 +600,7 @@ roundl (long double x) if (x > DBL_MAX || x < -DBL_MAX) { #ifdef HAVE_NEXTAFTERL - static long double prechalf = nexafterl (0.5L, LDBL_MAX); + long double prechalf = nextafterl (0.5L, LDBL_MAX); #else static long double prechalf = 0.5L; #endif