about summary refs log tree commit diff
path: root/sysdeps/ieee754
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/ieee754')
-rw-r--r--sysdeps/ieee754/huge_val.h38
-rw-r--r--sysdeps/ieee754/nan.h37
2 files changed, 54 insertions, 21 deletions
diff --git a/sysdeps/ieee754/huge_val.h b/sysdeps/ieee754/huge_val.h
index 9d1785b75f..a2520859e4 100644
--- a/sysdeps/ieee754/huge_val.h
+++ b/sysdeps/ieee754/huge_val.h
@@ -27,6 +27,17 @@
 
 /* IEEE positive infinity (-HUGE_VAL is negative infinity).  */
 
+#ifdef	__GNUC__
+
+#define HUGE_VAL                                                            \
+  (__extension__                                                            \
+   ((union { unsigned __l __attribute__((__mode__(__DI__))); double __d; }) \
+    { __l: 0x7ff0000000000000ULL }).__d)
+
+#else /* not GCC */
+
+typedef union { unsigned char __c[8]; double __d; } __huge_val_t;
+
 #if __BYTE_ORDER == __BIG_ENDIAN
 #define	__HUGE_VAL_bytes	{ 0x7f, 0xf0, 0, 0, 0, 0, 0, 0 }
 #endif
@@ -34,13 +45,9 @@
 #define	__HUGE_VAL_bytes	{ 0, 0, 0, 0, 0, 0, 0xf0, 0x7f }
 #endif
 
-#define __huge_val_t	union { unsigned char __c[8]; double __d; }
-#ifdef	__GNUC__
-#define	HUGE_VAL	(__extension__ \
-			 ((__huge_val_t) { __c: __HUGE_VAL_bytes }).__d)
-#else	/* Not GCC.  */
 static __huge_val_t __huge_val = { __HUGE_VAL_bytes };
 #define	HUGE_VAL	(__huge_val.__d)
+
 #endif	/* GCC.  */
 
 
@@ -48,6 +55,17 @@ static __huge_val_t __huge_val = { __HUGE_VAL_bytes };
 
 #ifdef __USE_ISOC9X
 
+#ifdef __GNUC__
+
+#define HUGE_VALF                                                           \
+  (__extension__                                                            \
+   ((union { unsigned __l __attribute__((__mode__(__SI__))); float __d; })  \
+    { __l: 0x7f800000UL }).__d)
+
+#else /* not GCC */
+
+typedef union { unsigned char __c[4]; float __f; } __huge_valf_t;
+
 #if __BYTE_ORDER == __BIG_ENDIAN
 #define	__HUGE_VALF_bytes	{ 0x7f, 0x80, 0, 0 }
 #endif
@@ -55,13 +73,9 @@ static __huge_val_t __huge_val = { __HUGE_VAL_bytes };
 #define	__HUGE_VALF_bytes	{ 0, 0, 0x80, 0x7f }
 #endif
 
-#define __huge_valf_t	union { unsigned char __c[4]; float __f; }
-#ifdef	__GNUC__
-#define	HUGE_VALF	(__extension__ \
-			 ((__huge_valf_t) { __c: __HUGE_VALF_bytes }).__f)
-#else	/* Not GCC.  */
 static __huge_valf_t __huge_valf = { __HUGE_VALF_bytes };
 #define	HUGE_VALF	(__huge_valf.__f)
+
 #endif	/* GCC.  */
 
 
@@ -69,6 +83,6 @@ static __huge_valf_t __huge_valf = { __HUGE_VALF_bytes };
    same as `double'.  */
 #define HUGE_VALL HUGE_VAL
 
-#endif	/* __USE_ISOC9X.  */
+#endif /* __USE_ISOC9X.  */
 
-#endif	   /* huge_val.h */
+#endif /* huge_val.h */
diff --git a/sysdeps/ieee754/nan.h b/sysdeps/ieee754/nan.h
index bea98d96d4..d4e6842562 100644
--- a/sysdeps/ieee754/nan.h
+++ b/sysdeps/ieee754/nan.h
@@ -1,5 +1,5 @@
 /* `NAN' constant for IEEE 754 machines.
-   Copyright (C) 1992, 1996 Free Software Foundation, Inc.
+   Copyright (C) 1992, 1996, 1997 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
 
    The GNU C Library is free software; you can redistribute it and/or
@@ -23,23 +23,42 @@
 
 /* IEEE Not A Number.  */
 
+#ifdef	__GNUC__
+
+#define NAN                                                                 \
+  (__extension__                                                            \
+   ((union { unsigned __l __attribute__((__mode__(__DI__))); double __d; }) \
+    { __l: 0x7ff8000000000000ULL }).__d)
+
+#define NANF                                                                \
+  (__extension__                                                            \
+   ((union { unsigned __l __attribute__((__mode__(__SI__))); flaot __d; })  \
+    { __l: 0x7fc00000UL }).__d)
+
+#else
+
 #include <endian.h>
 
 #if __BYTE_ORDER == __BIG_ENDIAN
 #define	__nan_bytes		{ 0x7f, 0xf8, 0, 0, 0, 0, 0, 0 }
+#define	__nanf_bytes		{ 0x7f, 0xc0, 0, 0 }
 #endif
 #if __BYTE_ORDER == __LITTLE_ENDIAN
 #define	__nan_bytes		{ 0, 0, 0, 0, 0, 0, 0xf8, 0x7f }
+#define	__nanf_bytes		{ 0, 0, 0xc0, 0x7f }
 #endif
 
-#ifdef	__GNUC__
-#define	NAN \
-  (__extension__ ((union { unsigned char __c[8];			      \
-			   double __d; })				      \
-		  { __nan_bytes }).__d)
-#else	/* Not GCC.  */
-static CONST char __nan[8] = __nan_bytes;
-#define	NAN	(*(CONST double *) __nan)
+static union { unsigned char __c[8]; double __d; } __nan = { __nan_bytes };
+#define	NAN	(__nan.__d)
+
+static union { unsigned char __c[4]; double __d; } __nanf = { __nanf_bytes };
+#define	NANF	(__nanf.__d)
+
 #endif	/* GCC.  */
 
+/* Generally there is no separate `long double' format and it is the
+   same as `double'.  */
+
+#define NANL  NAN
+
 #endif	/* nan.h */