git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

re PR libquadmath/47293 (libquadmath: strtoflt128 - NAN not correctly read and C99 hex floating point format missing) 

2011-01-31  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libquadmath/47293
	* gdtoa/qd_qnan.h: Fix NAN bit patterns.
	* gdtoa/strtopQ.c (strtoflt128): Handle endianess with NAN.

From-SVN: r169466
This commit is contained in:
Jerry DeLisle 2011-02-01 02:29:18 +00:00
parent 30f276c1dc
commit 21ac7f65b8
3 changed files with 16 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libquadmath/ChangeLog
View File

@ -1,3 +1,9 @@
2011-01-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libquadmath/47293
* gdtoa/qd_qnan.h: Fix NAN bit patterns.
* gdtoa/strtopQ.c (strtoflt128): Handle endianess with NAN.
2011-01-17 Tobias Burnus <burnus@net-b.de> 2011-01-17 Tobias Burnus <burnus@net-b.de>
PR fortran/47295 PR fortran/47295

12
libquadmath/gdtoa/gd_qnan.h
View File

@ -1,12 +1,12 @@
#define f_QNAN 0xffc00000 #define f_QNAN 0x7fc00000
#define d_QNAN0 0x0 #define d_QNAN0 0x0
#define d_QNAN1 0xfff80000 #define d_QNAN1 0x7ff80000
#define ld_QNAN0 0x0 #define ld_QNAN0 0x0
#define ld_QNAN1 0xc0000000 #define ld_QNAN1 0x0
#define ld_QNAN2 0xffff #define ld_QNAN2 0x0
#define ld_QNAN3 0x0 #define ld_QNAN3 0x7fff8000
#define ldus_QNAN0 0x0 #define ldus_QNAN0 0x0
#define ldus_QNAN1 0x0 #define ldus_QNAN1 0x0
#define ldus_QNAN2 0x0 #define ldus_QNAN2 0x0
#define ldus_QNAN3 0xc000 #define ldus_QNAN3 0xc000
#define ldus_QNAN4 0xffff #define ldus_QNAN4 0x7fff

8
libquadmath/gdtoa/strtopQ.c
View File

@ -92,10 +92,10 @@ strtoflt128(CONST char *s, char **sp)
break; break;
case STRTOG_NaN: case STRTOG_NaN:
L[0] = ld_QNAN0; L[_0] = ld_QNAN3;
L[1] = ld_QNAN1; L[_1] = ld_QNAN2;
L[2] = ld_QNAN2; L[_2] = ld_QNAN1;
L[3] = ld_QNAN3; L[_3] = ld_QNAN0;
} }
if (k & STRTOG_Neg) if (k & STRTOG_Neg)
L[_0] |= 0x80000000L; L[_0] |= 0x80000000L;