summaryrefslogtreecommitdiff
path: root/set_si.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2001-11-10 01:45:36 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2001-11-10 01:45:36 +0000
commitf1c41fb6bd97c0a5680aa4df1a00a01f4a4d0d60 (patch)
tree08e27e3c47d4584830acca621cbe6364d1386d37 /set_si.c
parent3bdb8b4f6f3ab6fc0c2aa5f71535a2c7133cc04c (diff)
downloadmpfr-f1c41fb6bd97c0a5680aa4df1a00a01f4a4d0d60.tar.gz
GNU coding style. K&R function headers removed.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@1488 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'set_si.c')
-rw-r--r--set_si.c45
1 files changed, 20 insertions, 25 deletions
diff --git a/set_si.c b/set_si.c
index e71a9e7a9..0fe1f0cb5 100644
--- a/set_si.c
+++ b/set_si.c
@@ -26,14 +26,7 @@ MA 02111-1307, USA. */
#include "mpfr-impl.h"
int
-#if __STDC__
mpfr_set_si (mpfr_ptr x, long i, mp_rnd_t rnd_mode)
-#else
-mpfr_set_si (x, i, rnd_mode)
- mpfr_ptr x;
- long i;
- mp_rnd_t rnd_mode;
-#endif
{
int inex;
mp_size_t xn;
@@ -42,11 +35,12 @@ mpfr_set_si (x, i, rnd_mode)
MPFR_CLEAR_FLAGS(x);
if (i == 0)
- {
- MPFR_SET_ZERO(x);
- if (MPFR_SIGN(x) < 0) MPFR_CHANGE_SIGN(x);
- MPFR_RET(0);
- }
+ {
+ MPFR_SET_ZERO(x);
+ if (MPFR_SIGN(x) < 0)
+ MPFR_CHANGE_SIGN(x);
+ MPFR_RET(0);
+ }
xn = (MPFR_PREC(x)-1)/BITS_PER_MP_LIMB;
ai = SAFE_ABS(long, i);
@@ -64,25 +58,26 @@ mpfr_set_si (x, i, rnd_mode)
/* round if MPFR_PREC(x) smaller than length of i */
if (MPFR_PREC(x) < nbits)
- {
- int carry;
-
- carry = mpfr_round_raw(xp+xn, xp+xn, nbits, (i < 0), MPFR_PREC(x),
- rnd_mode, &inex);
- if (carry)
{
- mp_exp_t exp = MPFR_EXP(x);
+ int carry;
+
+ carry = mpfr_round_raw(xp+xn, xp+xn, nbits, (i < 0), MPFR_PREC(x),
+ rnd_mode, &inex);
+ if (carry)
+ {
+ mp_exp_t exp = MPFR_EXP(x);
- if (exp == __mpfr_emax)
- return mpfr_set_overflow(x, rnd_mode, (ai < 0 ? -1 : 1));
+ if (exp == __mpfr_emax)
+ return mpfr_set_overflow(x, rnd_mode, (ai < 0 ? -1 : 1));
- MPFR_EXP(x)++;
- xp[xn] = MP_LIMB_T_HIGHBIT;
+ MPFR_EXP(x)++;
+ xp[xn] = MP_LIMB_T_HIGHBIT;
+ }
}
- }
/* warning: don't change the precision of x! */
- if ((i < 0) ^ (MPFR_SIGN(x) < 0)) MPFR_CHANGE_SIGN(x);
+ if ((i < 0) ^ (MPFR_SIGN(x) < 0))
+ MPFR_CHANGE_SIGN(x);
MPFR_RET(inex);
}