aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics
diff options
context:
space:
mode:
authorTobias Burnus <burnus@net-b.de>2011-02-22 13:37:12 +0100
committerTobias Burnus <burnus@gcc.gnu.org>2011-02-22 13:37:12 +0100
commit1c4bc9caa31de74c238dda40f291ed4363d973ac (patch)
treeec0150d7c88d222c4057f74d7fddf40319da8767 /libgfortran/intrinsics
parente84589e12916daf9b743432a0744ead7f31f2660 (diff)
downloadgcc-1c4bc9caa31de74c238dda40f291ed4363d973ac.zip
gcc-1c4bc9caa31de74c238dda40f291ed4363d973ac.tar.gz
gcc-1c4bc9caa31de74c238dda40f291ed4363d973ac.tar.bz2
re PR libfortran/47830 (errors in intrinsics/c99_functions.c)
2011-02-22 Tobias Burnus <burnus@net-b.de> Kai-Uwe Eckhardt <kuehro@gmx.de> PR libfortran/47830 * intrinsics/c99_functions.c (roundl): Make C valid for HAVE_NEXTAFTERL. Co-Authored-By: Kai-Uwe Eckhardt <kuehro@gmx.de> From-SVN: r170396
Diffstat (limited to 'libgfortran/intrinsics')
-rw-r--r--libgfortran/intrinsics/c99_functions.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c
index 8a9c2f1..9ba5544 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