summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2016-06-03 09:05:52 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2016-06-03 09:05:52 +0000
commitce6db01917269702e951ad9310f68dce26f4f3db (patch)
tree394afc0f59823b93907735e4d6ecc897dcc20f5b
parent64b6a91bfdedfb9d031917298588afe9012266dc (diff)
downloadmpfr-ce6db01917269702e951ad9310f68dce26f4f3db.tar.gz
[src/mpfr-impl.h] UBF support: added MPFR_IS_SINGULAR_OR_UBF and
MPFR_ARE_SINGULAR_OR_UBF macros. git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/branches/ubf@10415 280ebfd0-de03-0410-8827-d642c229c3f4
-rw-r--r--src/mpfr-impl.h5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/mpfr-impl.h b/src/mpfr-impl.h
index e0167eff6..d215f5242 100644
--- a/src/mpfr-impl.h
+++ b/src/mpfr-impl.h
@@ -909,6 +909,7 @@ typedef intmax_t mpfr_eexp_t;
#define MPFR_IS_FP(x) (!MPFR_IS_NAN(x) && !MPFR_IS_INF(x))
#define MPFR_IS_SINGULAR(x) (MPFR_EXP(x) <= MPFR_EXP_INF)
+#define MPFR_IS_SINGULAR_OR_UBF(x) (MPFR_EXP(x) <= MPFR_EXP_UBF)
#define MPFR_IS_PURE_FP(x) \
(!MPFR_IS_SINGULAR(x) && \
(MPFR_ASSERTD (MPFR_EXP (x) >= MPFR_EMIN_MIN && \
@@ -924,6 +925,10 @@ typedef intmax_t mpfr_eexp_t;
#define MPFR_ARE_SINGULAR(x,y) \
(MPFR_UNLIKELY(MPFR_IS_SINGULAR(x)) || MPFR_UNLIKELY(MPFR_IS_SINGULAR(y)))
+#define MPFR_ARE_SINGULAR_OR_UBF(x,y) \
+ (MPFR_UNLIKELY(MPFR_IS_SINGULAR_OR_UBF(x)) || \
+ MPFR_UNLIKELY(MPFR_IS_SINGULAR_OR_UBF(y)))
+
#define MPFR_IS_POWER_OF_2(x) \
(mpfr_cmp_ui_2exp ((x), 1, MPFR_GET_EXP (x) - 1) == 0)