[lmi-commits] [lmi] master ad1f8a2f 2/2: Expunge unused macros

[Greg Chicares]

branch: master
commit ad1f8a2fd1e9df57442f2a62cd5c2e2bfb1567f2
Author: Gregory W. Chicares <gchicares@sbcglobal.net>
Commit: Gregory W. Chicares <gchicares@sbcglobal.net>

    Expunge unused macros
---
 fdlibm_expm1.c | 23 -----------------------
 fdlibm_log1p.c | 27 ++-------------------------
 2 files changed, 2 insertions(+), 48 deletions(-)

diff --git a/fdlibm_expm1.c b/fdlibm_expm1.c
index 06802eaa..1211b0d0 100644
--- a/fdlibm_expm1.c
+++ b/fdlibm_expm1.c
@@ -38,7 +38,6 @@
 #   pragma GCC diagnostic ignored "-Wsign-conversion"
 #   pragma GCC diagnostic ignored "-Wstrict-aliasing"
 #   pragma GCC diagnostic ignored "-Wunsuffixed-float-constants"
-#   pragma GCC diagnostic ignored "-Wunused-macros"
 #endif // defined LMI_GCC
 
 /* @(#)fdlibm.h 1.5 04/04/22 */
@@ -69,13 +68,9 @@
 #if   __FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__
 #   define FDLIBM_HI(x) *(1+(int*)&x)
 #   define FDLIBM_LO(x) *(int*)&x
-#   define FDLIBM_HIp(x) *(1+(int*)x)
-#   define FDLIBM_LOp(x) *(int*)x
 #elif __FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__
 #   define FDLIBM_HI(x) *(int*)&x
 #   define FDLIBM_LO(x) *(1+(int*)&x)
-#   define FDLIBM_HIp(x) *(int*)x
-#   define FDLIBM_LOp(x) *(1+(int*)x)
 #else  // unknown endianness
 #   error Unknown endianness.
 #endif // unknown endianness
@@ -92,8 +87,6 @@
 
 extern int signgam;
 
-#define MAXFLOAT ((float)3.40282346638528860e+38)
-
 struct exception {
     int    type;
     char*  name;
@@ -102,22 +95,6 @@ struct exception {
     double retval;
 };
 
-#define HUGE      MAXFLOAT
-
-/*
- * set X_TLOSS = pi*2**52, which is possibly defined in <values.h>
- * (one may replace the following line by "#include <values.h>")
- */
-
-#define X_TLOSS   1.41484755040568800000e+16
-
-#define DOMAIN    1
-#define SING      2
-#define OVERFLOW  3
-#define UNDERFLOW 4
-#define TLOSS     5
-#define PLOSS     6
-
 /*
  * ANSI/POSIX
  */
diff --git a/fdlibm_log1p.c b/fdlibm_log1p.c
index cccfe774..b4ba84fd 100644
--- a/fdlibm_log1p.c
+++ b/fdlibm_log1p.c
@@ -36,7 +36,6 @@
 #   pragma GCC diagnostic push
 #   pragma GCC diagnostic ignored "-Wstrict-aliasing"
 #   pragma GCC diagnostic ignored "-Wunsuffixed-float-constants"
-#   pragma GCC diagnostic ignored "-Wunused-macros"
 #endif // defined LMI_GCC
 
 /* @(#)fdlibm.h 1.5 04/04/22 */
@@ -66,14 +65,10 @@
 
 #if   __FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__
 #   define FDLIBM_HI(x) *(1+(int*)&x)
-#   define FDLIBM_LO(x) *(int*)&x
-#   define FDLIBM_HIp(x) *(1+(int*)x)
-#   define FDLIBM_LOp(x) *(int*)x
+// #   define FDLIBM_LO(x) *(int*)&x     // not used in this file
 #elif __FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__
 #   define FDLIBM_HI(x) *(int*)&x
-#   define FDLIBM_LO(x) *(1+(int*)&x)
-#   define FDLIBM_HIp(x) *(int*)x
-#   define FDLIBM_LOp(x) *(1+(int*)x)
+// #   define FDLIBM_LO(x) *(1+(int*)&x) // not used in this file
 #else  // unknown endianness
 #   error Unknown endianness.
 #endif // unknown endianness
@@ -90,8 +85,6 @@
 
 extern int signgam;
 
-#define MAXFLOAT ((float)3.40282346638528860e+38)
-
 struct exception {
     int    type;
     char*  name;
@@ -100,22 +93,6 @@ struct exception {
     double retval;
 };
 
-#define HUGE      MAXFLOAT
-
-/*
- * set X_TLOSS = pi*2**52, which is possibly defined in <values.h>
- * (one may replace the following line by "#include <values.h>")
- */
-
-#define X_TLOSS   1.41484755040568800000e+16
-
-#define DOMAIN    1
-#define SING      2
-#define OVERFLOW  3
-#define UNDERFLOW 4
-#define TLOSS     5
-#define PLOSS     6
-
 /*
  * ANSI/POSIX
  */