summaryrefslogtreecommitdiff
path: root/asinh.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2003-10-28 16:31:13 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2003-10-28 16:31:13 +0000
commit117edf14c822a22cdd9c25689aeadc904a1a30d1 (patch)
treee39bd61cefc24cc6cfbc5b2b956e4fb36015d111 /asinh.c
parent734c0a144b04e2cae4e67b394010e3f6e3cadecc (diff)
downloadmpfr-117edf14c822a22cdd9c25689aeadc904a1a30d1.tar.gz
Use of MPFR_UNLIKELY and MPFR_IS_SINGULAR for fast detection of special values (Nan, Inf or Zero).
Start to encapsulate the sign to be independant of the reprensation (Must be 1 or -1). git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2525 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'asinh.c')
-rw-r--r--asinh.c44
1 files changed, 22 insertions, 22 deletions
diff --git a/asinh.c b/asinh.c
index 2a110787a..bb95bf17f 100644
--- a/asinh.c
+++ b/asinh.c
@@ -37,34 +37,34 @@ mpfr_asinh (mpfr_ptr y, mpfr_srcptr x, mp_rnd_t rnd_mode)
mpfr_t t, te, ti; /* auxiliary variables */
long int err;
- if (MPFR_IS_NAN(x))
- {
- MPFR_SET_NAN(y);
- MPFR_RET_NAN;
- }
-
- MPFR_CLEAR_NAN(y);
-
- if (MPFR_IS_INF(x))
- {
- MPFR_SET_INF(y);
- MPFR_SET_SAME_SIGN(y, x);
- MPFR_RET(0);
- }
-
- MPFR_CLEAR_INF(y);
-
- if (MPFR_IS_ZERO(x))
+ if (MPFR_UNLIKELY( MPFR_IS_SINGULAR(x) ))
{
- MPFR_SET_ZERO(y); /* asinh(0) = 0 */
- MPFR_SET_SAME_SIGN(y, x);
- MPFR_RET(0);
+ if (MPFR_IS_NAN(x))
+ {
+ MPFR_SET_NAN(y);
+ MPFR_RET_NAN;
+ }
+ MPFR_CLEAR_NAN(y);
+ if (MPFR_IS_INF(x))
+ {
+ MPFR_SET_INF(y);
+ MPFR_SET_SAME_SIGN(y, x);
+ MPFR_RET(0);
+ }
+ MPFR_CLEAR_INF(y);
+ if (MPFR_IS_ZERO(x))
+ {
+ MPFR_SET_ZERO(y); /* asinh(0) = 0 */
+ MPFR_SET_SAME_SIGN(y, x);
+ MPFR_RET(0);
+ }
+ MPFR_ASSERTN(1);
}
Nx = MPFR_PREC(x); /* Precision of input variable */
Ny = MPFR_PREC(y); /* Precision of output variable */
- neg = MPFR_SIGN(x) < 0;
+ neg = MPFR_IS_NEG(x);
/* General case */