summaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2014-02-21 14:12:39 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2014-02-21 14:12:39 +0000
commit3a1c67fa35e00adcaf1906593f3be857affe69ba (patch)
treeb33783b44b0407ea5e1a6743a4bab493a9de4c32 /tools
parent12f6e62d2b1885c20ec2e9cd3a06f42339e4f530 (diff)
downloadmpfr-3a1c67fa35e00adcaf1906593f3be857affe69ba.tar.gz
[tools/mbench] Replaced GMP_RNDx by MPFR_RNDx.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@8988 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tools')
-rw-r--r--tools/mbench/generate.c8
-rw-r--r--tools/mbench/mfv5-crlibm.cc4
-rw-r--r--tools/mbench/mfv5-libc.cc4
-rw-r--r--tools/mbench/mfv5-mpfr.cc8
-rw-r--r--tools/mbench/mfv5.cc4
-rw-r--r--tools/mbench/mpfr-gfx.c54
-rw-r--r--tools/mbench/mpfr-v4.c30
-rw-r--r--tools/mbench/mpfr-v6.c68
8 files changed, 90 insertions, 90 deletions
diff --git a/tools/mbench/generate.c b/tools/mbench/generate.c
index a81115dda..52ab67dc5 100644
--- a/tools/mbench/generate.c
+++ b/tools/mbench/generate.c
@@ -29,7 +29,7 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
#endif
#define fp_t mpfr_t
-#define fp_set_fr(dest,src) mpfr_set (dest, src, GMP_RNDN)
+#define fp_set_fr(dest,src) mpfr_set (dest, src, MPFR_RNDN)
#define MAX_PREC 10000
#define BASE 16
@@ -44,7 +44,7 @@ void gnumb_read (const char *filename, fp_t *dest, int n)
mpfr_init2 (x, MAX_PREC);
for (i = 0 ; i < n ; i++)
{
- if (mpfr_inp_str (x, f, 16, GMP_RNDN) == 0)
+ if (mpfr_inp_str (x, f, 16, MPFR_RNDN) == 0)
{
printf ("Error reading entry %d/%d\n", i, n);
mpfr_clear (x);
@@ -75,8 +75,8 @@ void gnumb_generate (const char *filename, int n, unsigned long seed)
mpfr_urandomb (x, state);
if ((i & 2) == 0)
mpfr_mul_2si (x, x, (rand()%(2*GMP_NUMB_BITS))-GMP_NUMB_BITS,
- GMP_RNDN);
- mpfr_out_str (f, 16, 0, x, GMP_RNDN);
+ MPFR_RNDN);
+ mpfr_out_str (f, 16, 0, x, MPFR_RNDN);
fputc ('\n', f);
}
diff --git a/tools/mbench/mfv5-crlibm.cc b/tools/mbench/mfv5-crlibm.cc
index 1311177db..a52776d68 100644
--- a/tools/mbench/mfv5-crlibm.cc
+++ b/tools/mbench/mfv5-crlibm.cc
@@ -122,8 +122,8 @@ bool crlibm_test<T>::test (const vector<string> &base, const option_test &opt) {
table = new double[size];
mpfr_init2 (x, 530);
for (i = 0 ; i < size ; i++) {
- mpfr_set_str (x, base[i].c_str(), 10, GMP_RNDN);
- table[i] = mpfr_get_d (x, GMP_RNDN);
+ mpfr_set_str (x, base[i].c_str(), 10, MPFR_RNDN);
+ table[i] = mpfr_get_d (x, MPFR_RNDN);
}
mpfr_clear (x);
}
diff --git a/tools/mbench/mfv5-libc.cc b/tools/mbench/mfv5-libc.cc
index 469e72221..73435455b 100644
--- a/tools/mbench/mfv5-libc.cc
+++ b/tools/mbench/mfv5-libc.cc
@@ -175,8 +175,8 @@ bool libc_test<T>::test (const vector<string> &base, const option_test &opt) {
table = new double[size];
mpfr_init2 (x, 530);
for (i = 0 ; i < size ; i++) {
- mpfr_set_str (x, base[i].c_str(), 10, GMP_RNDN);
- table[i] = mpfr_get_d (x, GMP_RNDN);
+ mpfr_set_str (x, base[i].c_str(), 10, MPFR_RNDN);
+ table[i] = mpfr_get_d (x, MPFR_RNDN);
}
mpfr_clear (x);
}
diff --git a/tools/mbench/mfv5-mpfr.cc b/tools/mbench/mfv5-mpfr.cc
index add4cb582..ac90e9a7b 100644
--- a/tools/mbench/mfv5-mpfr.cc
+++ b/tools/mbench/mfv5-mpfr.cc
@@ -236,17 +236,17 @@ bool mpfr_test<T>::test (const vector<string> &base, const option_test &opt) {
table = new mpfr_t[size];
for (i = 0 ; i < size ; i++) {
mpfr_init2 (table[i], opt.prec);
- mpfr_set_str (table[i], base[i].c_str(), 10, GMP_RNDN);
+ mpfr_set_str (table[i], base[i].c_str(), 10, MPFR_RNDN);
}
mpfr_inits2 (opt.prec, a, b, c, NULL);
}
/* Do Measure */
for(i = 0 ; i < (size-1) ; i++) {
- mpfr_set (b, table[i], GMP_RNDN);
- mpfr_set (c, table[i+1], GMP_RNDN);
+ mpfr_set (b, table[i], MPFR_RNDN);
+ mpfr_set (c, table[i+1], MPFR_RNDN);
TIMP_OVERHEAD ();
- m = TIMP_MEASURE (f.func (a, b, c, GMP_RNDN) );
+ m = TIMP_MEASURE (f.func (a, b, c, MPFR_RNDN) );
cont = tim->update (i, m) || cont;
}
diff --git a/tools/mbench/mfv5.cc b/tools/mbench/mfv5.cc
index f687463ba..834b08f73 100644
--- a/tools/mbench/mfv5.cc
+++ b/tools/mbench/mfv5.cc
@@ -81,8 +81,8 @@ build_base (vector<string> &base, const option_test &opt)
for (i = 0 ; i < n ; i++) {
mpfr_urandomb (x, state);
- mpfr_mul_2si (x, x, (rand()%GMP_NUMB_BITS)-(GMP_NUMB_BITS/2), GMP_RNDN);
- str = mpfr_get_str (NULL, &e, 10, 0, x, GMP_RNDN);
+ mpfr_mul_2si (x, x, (rand()%GMP_NUMB_BITS)-(GMP_NUMB_BITS/2), MPFR_RNDN);
+ str = mpfr_get_str (NULL, &e, 10, 0, x, MPFR_RNDN);
if (str == 0)
abort ();
buffer = (char *) malloc (strlen(str)+50);
diff --git a/tools/mbench/mpfr-gfx.c b/tools/mbench/mpfr-gfx.c
index 2440fc6c7..9ddfdec22 100644
--- a/tools/mbench/mpfr-gfx.c
+++ b/tools/mbench/mpfr-gfx.c
@@ -53,23 +53,23 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
#undef EXTRA_TEST_LIST
# define EXTRA_TEST_LIST \
- BENCH("mpfr_exp", mpfr_exp(a,b,GMP_RNDN)); \
- BENCH("mpfr_log", mpfr_log(a,b,GMP_RNDN)); \
- BENCH("mpfr_sin", mpfr_sin(a,b,GMP_RNDN)); \
- BENCH("mpfr_cos", mpfr_cos(a,b,GMP_RNDN)); \
- BENCH("mpfr_tan", mpfr_tan(a,b,GMP_RNDN)); \
- BENCH("mpfr_asin", mpfr_asin(a,b,GMP_RNDN)); \
- BENCH("mpfr_acos", mpfr_acos(a,b,GMP_RNDN)); \
- BENCH("mpfr_atan", mpfr_atan(a,b,GMP_RNDN)); \
- BENCH("mpfr_agm", mpfr_agm(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_const_log2", (mpfr_const_log2) (a, GMP_RNDN)); \
- BENCH("mpfr_const_pi", (mpfr_const_pi)(a, GMP_RNDN)); \
- BENCH("mpfr_sinh", mpfr_sinh(a,b,GMP_RNDN)); \
- BENCH("mpfr_cosh", mpfr_cosh(a,b,GMP_RNDN)); \
- BENCH("mpfr_tanh", mpfr_tanh(a,b,GMP_RNDN)); \
- BENCH("mpfr_asinh", mpfr_asinh(a,b,GMP_RNDN)); \
- BENCH("mpfr_acosh", mpfr_acosh(a,b,GMP_RNDN)); \
- BENCH("mpfr_atanh", mpfr_atanh(a,b,GMP_RNDN));
+ BENCH("mpfr_exp", mpfr_exp(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_log", mpfr_log(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_sin", mpfr_sin(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_cos", mpfr_cos(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_tan", mpfr_tan(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_asin", mpfr_asin(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_acos", mpfr_acos(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_atan", mpfr_atan(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_agm", mpfr_agm(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_const_log2", (mpfr_const_log2) (a, MPFR_RNDN)); \
+ BENCH("mpfr_const_pi", (mpfr_const_pi)(a, MPFR_RNDN)); \
+ BENCH("mpfr_sinh", mpfr_sinh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_cosh", mpfr_cosh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_tanh", mpfr_tanh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_asinh", mpfr_asinh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_acosh", mpfr_acosh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_atanh", mpfr_atanh(a,b,MPFR_RNDN));
@@ -89,16 +89,16 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
*/
#define TEST_LIST \
BENCH("MPFR::::::::::", ; ); \
- BENCH("mpfr_add", mpfr_add(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_sub", mpfr_sub(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_mul", mpfr_mul(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_div", mpfr_div(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_sqrt", mpfr_sqrt(a,b,GMP_RNDN)); \
+ BENCH("mpfr_add", mpfr_add(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_sub", mpfr_sub(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_mul", mpfr_mul(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_div", mpfr_div(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_sqrt", mpfr_sqrt(a,b,MPFR_RNDN)); \
BENCH("mpfr_cmp", mpfr_cmp(b,c)); \
BENCH("mpfr_sgn", mpfr_sgn(b)); \
- BENCH("mpfr_set", mpfr_set(a,b, GMP_RNDN)); \
- BENCH("mpfr_set0", mpfr_set_si(a,0,GMP_RNDN)); \
- BENCH("mpfr_set1", mpfr_set_si(a,1,GMP_RNDN)); \
+ BENCH("mpfr_set", mpfr_set(a,b, MPFR_RNDN)); \
+ BENCH("mpfr_set0", mpfr_set_si(a,0,MPFR_RNDN)); \
+ BENCH("mpfr_set1", mpfr_set_si(a,1,MPFR_RNDN)); \
BENCH("mpfr_swap", mpfr_swap(b,c)); \
BENCH("MPF:::::::::::", ; ); \
BENCH("mpf_add", mpf_add(x,y,z)); \
@@ -198,8 +198,8 @@ double get_speed(mpfr_prec_t p, int select)
/* Set var for tests */
mpf_set(y, yt[i]);
mpf_set(z, zt[i]);
- mpfr_set_f(b, yt[i], GMP_RNDN);
- mpfr_set_f(c, zt[i], GMP_RNDN);
+ mpfr_set_f(b, yt[i], MPFR_RNDN);
+ mpfr_set_f(c, zt[i], MPFR_RNDN);
SCS(( scs_set_mpfr(sc2, b), scs_set_mpfr(sc3, c) ));
/* if the measured time m is smaller than the smallest one
observed so far mc[i] for the i-th random number, we start
diff --git a/tools/mbench/mpfr-v4.c b/tools/mbench/mpfr-v4.c
index 681ffb194..92386ac77 100644
--- a/tools/mbench/mpfr-v4.c
+++ b/tools/mbench/mpfr-v4.c
@@ -49,16 +49,16 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
*/
#define TEST_LIST \
BENCH("MPFR::::::::::", ; ); \
- BENCH("add", mpfr_add(a,b,c,GMP_RNDN)); \
- BENCH("sub", mpfr_sub(a,b,c,GMP_RNDN)); \
- BENCH("mul", mpfr_mul(a,b,c,GMP_RNDN)); \
- BENCH("div", mpfr_div(a,b,c,GMP_RNDN)); \
- BENCH("sqrt", mpfr_sqrt(a,b,GMP_RNDN)); \
+ BENCH("add", mpfr_add(a,b,c,MPFR_RNDN)); \
+ BENCH("sub", mpfr_sub(a,b,c,MPFR_RNDN)); \
+ BENCH("mul", mpfr_mul(a,b,c,MPFR_RNDN)); \
+ BENCH("div", mpfr_div(a,b,c,MPFR_RNDN)); \
+ BENCH("sqrt", mpfr_sqrt(a,b,MPFR_RNDN)); \
BENCH("cmp", mpfr_cmp(b,c)); \
- BENCH("set", mpfr_set(a,b, GMP_RNDN)); \
- BENCH("set0", mpfr_set_ui(a,0,GMP_RNDN)); \
- BENCH("set1", mpfr_set_ui(a,1,GMP_RNDN)); \
- BENCH("setz", mpfr_set_z(a,zz,GMP_RNDN)); \
+ BENCH("set", mpfr_set(a,b, MPFR_RNDN)); \
+ BENCH("set0", mpfr_set_ui(a,0,MPFR_RNDN)); \
+ BENCH("set1", mpfr_set_ui(a,1,MPFR_RNDN)); \
+ BENCH("setz", mpfr_set_z(a,zz,MPFR_RNDN)); \
BENCH("swap", mpfr_swap(b,c)); \
BENCH("MPF:::::::::::", ; ); \
BENCH("add", mpf_add(x,y,z)); \
@@ -108,15 +108,15 @@ void mpfr_bench(mpfr_prec_t prec_a, mpfr_prec_t prec_b, mpfr_prec_t prec_c,
mpf_set_str(z, c_str, 10);
else
mpf_urandomb(z, state, prec_c);
- mpfr_set_f(b, y, GMP_RNDN);
- mpfr_set_f(c, z, GMP_RNDN);
+ mpfr_set_f(b, y, MPFR_RNDN);
+ mpfr_set_f(c, z, MPFR_RNDN);
mpz_init (zz);
mpz_urandomb (zz, state, 2*prec_b);
if (verbose)
{
- printf("B="); mpfr_out_str(stdout, 10, 0, b, GMP_RNDD);
- printf("\nC="); mpfr_out_str(stdout, 10, 0, c, GMP_RNDD);
+ printf("B="); mpfr_out_str(stdout, 10, 0, b, MPFR_RNDD);
+ printf("\nC="); mpfr_out_str(stdout, 10, 0, c, MPFR_RNDD);
putchar('\n');
}
TIMP_OVERHEAD ();
@@ -185,8 +185,8 @@ void mpfr_stats (unsigned long num, mpfr_prec_t prec_a, mpfr_prec_t prec_b,
op = 0;
mpf_set(y,yt[i]);
mpf_set(z,zt[i]);
- mpfr_set_f(b, yt[i], GMP_RNDN);
- mpfr_set_f(c, zt[i], GMP_RNDN);
+ mpfr_set_f(b, yt[i], MPFR_RNDN);
+ mpfr_set_f(c, zt[i], MPFR_RNDN);
#undef BENCH
#define BENCH(TEST_STR, TEST) \
m = TIMP_MEASURE(TEST); if (m < mc[i][op]) {mc[i][op] = m; cont = 4;} op++;
diff --git a/tools/mbench/mpfr-v6.c b/tools/mbench/mpfr-v6.c
index 8b146dc3f..784240cf3 100644
--- a/tools/mbench/mpfr-v6.c
+++ b/tools/mbench/mpfr-v6.c
@@ -62,16 +62,16 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
*/
#define TEST_LIST1 \
BENCH("MPFR::::::::::", ; ); \
- BENCH("add", mpfr_add(a,b,c,GMP_RNDN)); \
- BENCH("sub", mpfr_sub(a,b,c,GMP_RNDN)); \
- BENCH("mul", mpfr_mul(a,b,c,GMP_RNDN)); \
- BENCH("div", mpfr_div(a,b,c,GMP_RNDN)); \
- BENCH("sqrt", mpfr_sqrt(a,b,GMP_RNDN)); \
+ BENCH("add", mpfr_add(a,b,c,MPFR_RNDN)); \
+ BENCH("sub", mpfr_sub(a,b,c,MPFR_RNDN)); \
+ BENCH("mul", mpfr_mul(a,b,c,MPFR_RNDN)); \
+ BENCH("div", mpfr_div(a,b,c,MPFR_RNDN)); \
+ BENCH("sqrt", mpfr_sqrt(a,b,MPFR_RNDN)); \
BENCH("cmp", mpfr_cmp(b,c)); \
BENCH("sgn", (mpfr_sgn)(b)); \
- BENCH("set", mpfr_set(a,b, GMP_RNDN)); \
- BENCH("set0", mpfr_set_si(a,0,GMP_RNDN)); \
- BENCH("set1", mpfr_set_si(a,1,GMP_RNDN)); \
+ BENCH("set", mpfr_set(a,b, MPFR_RNDN)); \
+ BENCH("set0", mpfr_set_si(a,0,MPFR_RNDN)); \
+ BENCH("set1", mpfr_set_si(a,1,MPFR_RNDN)); \
BENCH("swap", mpfr_swap(b,c)); \
BENCH("MPF:::::::::::", ; ); \
BENCH("add", mpf_add(x,y,z)); \
@@ -87,23 +87,23 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
EXTRA_TEST_LIST
#define TEST_LIST2 \
- BENCH("mpfr_exp", mpfr_exp(a,b,GMP_RNDN)); \
- BENCH("mpfr_log", mpfr_log(a,b,GMP_RNDN)); \
- BENCH("mpfr_sin", mpfr_sin(a,b,GMP_RNDN)); \
- BENCH("mpfr_cos", mpfr_cos(a,b,GMP_RNDN)); \
- BENCH("mpfr_tan", mpfr_tan(a,b,GMP_RNDN)); \
- BENCH("mpfr_asin", mpfr_asin(a,b,GMP_RNDN)); \
- BENCH("mpfr_acos", mpfr_acos(a,b,GMP_RNDN)); \
- BENCH("mpfr_atan", mpfr_atan(a,b,GMP_RNDN)); \
- BENCH("mpfr_agm", mpfr_agm(a,b,c,GMP_RNDN)); \
- BENCH("mpfr_const_log2", (mpfr_const_log2) (a, GMP_RNDN)); \
- BENCH("mpfr_const_pi", (mpfr_const_pi)(a, GMP_RNDN)); \
- BENCH("mpfr_sinh", mpfr_sinh(a,b,GMP_RNDN)); \
- BENCH("mpfr_cosh", mpfr_cosh(a,b,GMP_RNDN)); \
- BENCH("mpfr_tanh", mpfr_tanh(a,b,GMP_RNDN)); \
- BENCH("mpfr_asinh", mpfr_asinh(a,b,GMP_RNDN)); \
- BENCH("mpfr_acosh", mpfr_acosh(a,b,GMP_RNDN)); \
- BENCH("mpfr_atanh", mpfr_atanh(a,b,GMP_RNDN)); \
+ BENCH("mpfr_exp", mpfr_exp(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_log", mpfr_log(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_sin", mpfr_sin(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_cos", mpfr_cos(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_tan", mpfr_tan(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_asin", mpfr_asin(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_acos", mpfr_acos(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_atan", mpfr_atan(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_agm", mpfr_agm(a,b,c,MPFR_RNDN)); \
+ BENCH("mpfr_const_log2", (mpfr_const_log2) (a, MPFR_RNDN)); \
+ BENCH("mpfr_const_pi", (mpfr_const_pi)(a, MPFR_RNDN)); \
+ BENCH("mpfr_sinh", mpfr_sinh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_cosh", mpfr_cosh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_tanh", mpfr_tanh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_asinh", mpfr_asinh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_acosh", mpfr_acosh(a,b,MPFR_RNDN)); \
+ BENCH("mpfr_atanh", mpfr_atanh(a,b,MPFR_RNDN)); \
BENCH("exp", d1 = exp(d2)); \
BENCH("log", d1 = log(d2)); \
BENCH("sin", d1 = sin(d2)); \
@@ -114,12 +114,12 @@ http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc.,
BENCH("atan", d1 = atan(d2));
#define TEST_LIST3 \
- BENCH("mpfr_cos", mpfr_cos(a,b,GMP_RNDN));
+ BENCH("mpfr_cos", mpfr_cos(a,b,MPFR_RNDN));
#define TEST_LIST4 \
- BENCH("get_d", d1 = mpfr_get_d (b, GMP_RNDN)); \
- BENCH("set_d", mpfr_set_d (b, d2, GMP_RNDN)); \
- BENCH("mul_ui", mpfr_mul_si (b, b, 123, GMP_RNDN));
+ BENCH("get_d", d1 = mpfr_get_d (b, MPFR_RNDN)); \
+ BENCH("set_d", mpfr_set_d (b, d2, MPFR_RNDN)); \
+ BENCH("mul_ui", mpfr_mul_si (b, b, 123, MPFR_RNDN));
#ifndef TEST_LIST
# define TEST_LIST TEST_LIST2
@@ -191,10 +191,10 @@ void make_stats(const char *filename, int num, mpfr_prec_t prec, int select_op,
printf("Pass %d...\n", j+1);
for(i = 0 ; i < num ; i++)
{
- mpfr_set (b, tab[i+0], GMP_RNDN);
- mpfr_set (c, tab[i+1], GMP_RNDN);
- mpf_set_fr (y, b, GMP_RNDN);
- mpf_set_fr (z, c, GMP_RNDN);
+ mpfr_set (b, tab[i+0], MPFR_RNDN);
+ mpfr_set (c, tab[i+1], MPFR_RNDN);
+ mpf_set_fr (y, b, MPFR_RNDN);
+ mpf_set_fr (z, c, MPFR_RNDN);
SCS(( scs_set_mpfr(sc2, b), scs_set_mpfr(sc3, c) ));
d1 = d2 = mpfr_get_d1 (b);
d3 = mpfr_get_d1 (c);
@@ -227,7 +227,7 @@ void make_stats(const char *filename, int num, mpfr_prec_t prec, int select_op,
if (verbose && select_op != 0) {
for (i = 0 ; i < num ; i++) {
- printf ("Tab[%02d]=", i); mpfr_out_str (stdout, 2, 10, tab[i], GMP_RNDN);
+ printf ("Tab[%02d]=", i); mpfr_out_str (stdout, 2, 10, tab[i], MPFR_RNDN);
printf ("\tt=%Lu\n", mc[i][select_op]);
}
}