Remove unnecessary variable mptwoim1

Code cleanup.

diff --git a/ChangeLog b/ChangeLog
index 2de1575..4ac86e2 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2012-12-28  Siddhesh Poyarekar  <siddhesh@redhat.com>
 
+       * sysdeps/ieee754/dbl-64/mpatan.c (__mpatan): Remove
+       __ATAN_TWOM.
+       * sysdeps/ieee754/dbl-64/mpatan.h: Likewise.
+
        * sysdeps/ieee754/dbl-64/atnat.h: Replaced constants with
        their values.
        * sysdeps/ieee754/dbl-64/atnat2.h: Likewise.

diff --git a/sysdeps/ieee754/dbl-64/mpatan.c b/sysdeps/ieee754/dbl-64/mpatan.c
index d897bbb..b2bf3ba 100644 (file)
--- a/sysdeps/ieee754/dbl-64/mpatan.c
+++ b/sysdeps/ieee754/dbl-64/mpatan.c
@@ -1,7 +1,7 @@
 /*
  * IBM Accurate Mathematical Library
  * written by International Business Machines Corp.
- * Copyright (C) 2001, 2011 Free Software Foundation
+ * Copyright (C) 2001-2012 Free Software Foundation
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU Lesser General Public License as published by
@@ -98,7 +98,7 @@ __mpatan(mp_no *x, mp_no *y, int p) {
     __sub(&mps,&mpt1,&mpt,p);
 
                          /* Compute Atan(x) */
-    mptwoim1.d[1] = __atan_twom[m].d;
+    mptwoim1.d[1] = 1 << m;
     __mul(&mptwoim1,&mpt,y,p);
 
   return;

diff --git a/sysdeps/ieee754/dbl-64/mpatan.h b/sysdeps/ieee754/dbl-64/mpatan.h
index f920cc2..ee7eaea 100644 (file)
--- a/sysdeps/ieee754/dbl-64/mpatan.h
+++ b/sysdeps/ieee754/dbl-64/mpatan.h
@@ -1,7 +1,7 @@
 /*
  * IBM Accurate Mathematical Library
  * Written by International Business Machines Corp.
- * Copyright (C) 2001, 2011 Free Software Foundation, Inc.
+ * Copyright (C) 2001-2012 Free Software Foundation, Inc.
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU Lesser General Public License as published by
@@ -83,18 +83,6 @@ extern const int __atan_np[33] attribute_hidden;
 /**/                  {{0x405d4000, 0x00000000} }, /* 117    */
                    };
 
-  const number
-    __atan_twom[8] = {                             /* 2**m   */
-/**/                  {{0x3ff00000, 0x00000000} }, /*   1.0  */
-/**/                  {{0x40000000, 0x00000000} }, /*   2.0  */
-/**/                  {{0x40100000, 0x00000000} }, /*   4.0  */
-/**/                  {{0x40200000, 0x00000000} }, /*   8.0  */
-/**/                  {{0x40300000, 0x00000000} }, /*  16.0  */
-/**/                  {{0x40400000, 0x00000000} }, /*  32.0  */
-/**/                  {{0x40500000, 0x00000000} }, /*  64.0  */
-/**/                  {{0x40600000, 0x00000000} }, /* 128.0  */
-                   };
-
 #else
 #ifdef LITTLE_ENDI
 
@@ -146,18 +134,6 @@ __atan_twonm1[33] = {                             /* 2n-1   */
 /**/                  {{0x00000000, 0x405d4000} }, /* 117    */
                    };
 
-  const number
-    __atan_twom[8] = {                             /* 2**m   */
-/**/                  {{0x00000000, 0x3ff00000} }, /*   1.0  */
-/**/                  {{0x00000000, 0x40000000} }, /*   2.0  */
-/**/                  {{0x00000000, 0x40100000} }, /*   4.0  */
-/**/                  {{0x00000000, 0x40200000} }, /*   8.0  */
-/**/                  {{0x00000000, 0x40300000} }, /*  16.0  */
-/**/                  {{0x00000000, 0x40400000} }, /*  32.0  */
-/**/                  {{0x00000000, 0x40500000} }, /*  64.0  */
-/**/                  {{0x00000000, 0x40600000} }, /* 128.0  */
-                   };
-
 #endif
 #endif