~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/internal/dtoa.cc

  • Committer: Monty Taylor
  • Date: 2010-08-12 20:27:32 UTC
  • mto: (1720.1.5 build)
  • mto: This revision was merged to the branch mainline in revision 1722.
  • Revision ID: mordred@inaugust.com-20100812202732-9kzchbkvkyki4n3u
Merged libdrizzle directly into tree.

Show diffs side-by-side

added added

removed removed

Lines of Context:
11
11
 
12
12
   You should have received a copy of the GNU General Public License
13
13
   along with this program; if not, write to the Free Software
14
 
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA */
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA */
15
15
 
16
16
/****************************************************************
17
17
 
20
20
 
21
21
  The author of this software is David M. Gay.
22
22
 
23
 
  Copyright (C) 1991, 2000, 2001 by Lucent Technologies.
 
23
  Copyright (c) 1991, 2000, 2001 by Lucent Technologies.
24
24
 
25
25
  Permission to use, copy, modify, and distribute this software for any
26
26
  purpose without fee is hereby granted, provided that this entire notice
35
35
 
36
36
 ***************************************************************/
37
37
 
38
 
#include <config.h>
 
38
#include "config.h"
39
39
 
40
 
#include <drizzled/internal/m_string.h>  /* for memcpy and NOT_FIXED_DEC */
 
40
#include "drizzled/internal/m_string.h"  /* for memcpy and NOT_FIXED_DEC */
41
41
 
42
42
#include <float.h>
43
43
 
482
482
 *
483
483
 * The author of this software is David M. Gay.
484
484
 *
485
 
 * Copyright (C) 1991, 2000, 2001 by Lucent Technologies.
 
485
 * Copyright (c) 1991, 2000, 2001 by Lucent Technologies.
486
486
 *
487
487
 * Permission to use, copy, modify, and distribute this software for any
488
488
 * purpose without fee is hereby granted, provided that this entire notice
720
720
}
721
721
 
722
722
 
723
 
static int hi0bits(ULong x)
 
723
static int hi0bits(register ULong x)
724
724
{
725
 
  int k= 0;
 
725
  register int k= 0;
726
726
 
727
727
  if (!(x & 0xffff0000))
728
728
  {
756
756
 
757
757
static int lo0bits(ULong *y)
758
758
{
759
 
  int k;
760
 
  ULong x= *y;
 
759
  register int k;
 
760
  register ULong x= *y;
761
761
 
762
762
  if (x & 7)
763
763
  {
1069
1069
 
1070
1070
static double ulp(double x)
1071
1071
{
1072
 
  Long L;
 
1072
  register Long L;
1073
1073
  double a;
1074
1074
 
1075
1075
  L= (word0(x) & Exp_mask) - (P - 1)*Exp_msk1;
1951
1951
    *sign= 0;
1952
1952
 
1953
1953
  /* If infinity, set decpt to DTOA_OVERFLOW, if 0 set it to 1 */
1954
 
  if ((((word0(d) & Exp_mask) == Exp_mask) && ((*decpt= DTOA_OVERFLOW) != 0)) ||
1955
 
      (!dval(d) && ((*decpt= 1) != 0)))
 
1954
  if (((word0(d) & Exp_mask) == Exp_mask && (*decpt= DTOA_OVERFLOW)) ||
 
1955
      (!dval(d) && (*decpt= 1)))
1956
1956
  {
1957
1957
    /* Infinity, NaN, 0 */
1958
1958
    char *res= (char*) malloc(2);