yggdrasil/gcc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fortran: fix issignaling() implementation

Browse Source 
libgfortran/ChangeLog:

	* ieee/issignaling_fallback.h: Fix GCC-specific preprocessor
	macros.
This commit is contained in:
Francois-Xavier Coudert
2022-01-25 21:54:03 +01:00
parent 58ec0964b1
commit fa262add75
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libgfortran/ieee/issignaling_fallback.h
+6 -6
View File
@@ -103,12 +103,12 @@ typedef union
long double value;
struct
{
#if __FLOAT_WORD_ORDER == __BIG_ENDIAN
#if __FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__
int sign_exponent:16;
unsigned int empty:16;
uint32_t msw;
uint32_t lsw;
#elif __FLOAT_WORD_ORDER == __LITTLE_ENDIAN
#elif __FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__
uint32_t lsw;
uint32_t msw;
int sign_exponent:16;
@@ -159,10 +159,10 @@ typedef union
long double value;
struct
{
#if __FLOAT_WORD_ORDER == __BIG_ENDIAN
#if __FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__
uint64_t msw;
uint64_t lsw;
#elif __FLOAT_WORD_ORDER == __LITTLE_ENDIAN
#elif __FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__
uint64_t lsw;
uint64_t msw;
#endif
@@ -204,10 +204,10 @@ typedef union
__float128 value;
struct
{
#if __FLOAT_WORD_ORDER == __BIG_ENDIAN
#if __FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__
uint64_t msw;
uint64_t lsw;
#elif __FLOAT_WORD_ORDER == __LITTLE_ENDIAN
#elif __FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__
uint64_t lsw;
uint64_t msw;
#endif