version 1.1.1.2, 2000/09/09 14:13:10 |
version 1.1.1.3, 2003/08/25 16:06:35 |
|
|
/* mpf_eq -- Compare two floats up to a specified bit #. |
/* mpf_eq -- Compare two floats up to a specified bit #. |
|
|
Copyright (C) 1993, 1995, 1996 Free Software Foundation, Inc. |
Copyright 1993, 1995, 1996, 2001, 2002 Free Software Foundation, Inc. |
|
|
This file is part of the GNU MP Library. |
This file is part of the GNU MP Library. |
|
|
Line 23 MA 02111-1307, USA. */ |
|
Line 23 MA 02111-1307, USA. */ |
|
#include "gmp-impl.h" |
#include "gmp-impl.h" |
|
|
int |
int |
#if __STDC__ |
|
mpf_eq (mpf_srcptr u, mpf_srcptr v, unsigned long int n_bits) |
mpf_eq (mpf_srcptr u, mpf_srcptr v, unsigned long int n_bits) |
#else |
|
mpf_eq (u, v, n_bits) |
|
mpf_srcptr u; |
|
mpf_srcptr v; |
|
unsigned long int n_bits; |
|
#endif |
|
{ |
{ |
mp_srcptr up, vp; |
mp_srcptr up, vp; |
mp_size_t usize, vsize, size, i; |
mp_size_t usize, vsize, size, i; |
Line 90 mpf_eq (u, v, n_bits) |
|
Line 83 mpf_eq (u, v, n_bits) |
|
|
|
if (usize > vsize) |
if (usize > vsize) |
{ |
{ |
if (vsize * BITS_PER_MP_LIMB < n_bits) |
if (vsize * GMP_NUMB_BITS < n_bits) |
return 0; /* surely too different */ |
return 0; /* surely too different */ |
size = vsize; |
size = vsize; |
} |
} |
else if (vsize > usize) |
else if (vsize > usize) |
{ |
{ |
if (usize * BITS_PER_MP_LIMB < n_bits) |
if (usize * GMP_NUMB_BITS < n_bits) |
return 0; /* surely too different */ |
return 0; /* surely too different */ |
size = usize; |
size = usize; |
} |
} |
Line 105 mpf_eq (u, v, n_bits) |
|
Line 98 mpf_eq (u, v, n_bits) |
|
size = usize; |
size = usize; |
} |
} |
|
|
if (size > (n_bits + BITS_PER_MP_LIMB - 1) / BITS_PER_MP_LIMB) |
if (size > (n_bits + GMP_NUMB_BITS - 1) / GMP_NUMB_BITS) |
size = (n_bits + BITS_PER_MP_LIMB - 1) / BITS_PER_MP_LIMB; |
size = (n_bits + GMP_NUMB_BITS - 1) / GMP_NUMB_BITS; |
|
|
up += usize - size; |
up += usize - size; |
vp += vsize - size; |
vp += vsize - size; |