diff options
author | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2016-06-03 09:05:52 +0000 |
---|---|---|
committer | vlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4> | 2016-06-03 09:05:52 +0000 |
commit | ce6db01917269702e951ad9310f68dce26f4f3db (patch) | |
tree | 394afc0f59823b93907735e4d6ecc897dcc20f5b | |
parent | 64b6a91bfdedfb9d031917298588afe9012266dc (diff) | |
download | mpfr-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.h | 5 |
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) |