OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

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
This commit is contained in:
Tobias Burnus 2011-02-22 13:37:12 +01:00 committed by Tobias Burnus
parent e84589e129
commit 1c4bc9caa3
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
libgfortran/ChangeLog
View File

@ -1,3 +1,10 @@
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.
2011-02-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/47567

2
libgfortran/intrinsics/c99_functions.c
View File

@ -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