mpfr/tests/tget_d.c

190   double var_d;
199   var_d = mpfr_get_d_2exp (&exp, var, MPFR_RNDN);
200   if (!DOUBLE_ISNAN (var_d))
203               " waiting for %g got %g\n", MPFR_DBL_NAN, var_d);
208   var_d = mpfr_get_d_2exp (&exp, var, MPFR_RNDN);
209   if ((exp != 0) || (var_d != 0.0))
213               var_d, exp);
218   var_d = mpfr_get_d_2exp (&exp, var, MPFR_RNDN);
219   if ((exp != 0) || (var_d != DBL_NEG_ZERO))
223               DBL_NEG_ZERO, var_d, exp);
228   var_d = mpfr_get_d_2exp (&exp, var, MPFR_RNDN);
229   if (var_d != MPFR_DBL_INFP)
232               " waiting for %g got %g\n", MPFR_DBL_INFP, var_d);
237   var_d = mpfr_get_d_2exp (&exp, var, MPFR_RNDN);
238   if (var_d != MPFR_DBL_INFM)
241               " waiting for %g got %g\n", MPFR_DBL_INFM, var_d);