New function mpn_out_str, for use in the testsuite.

diff --git a/ChangeLog b/ChangeLog
index 3087507dc971bc8f4c7e943e76fc5cae1aa12f9c..6dae1704cab01ec0fe5662466475884fa7d14f5a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2014-10-03  Niels Möller  <nisse@lysator.liu.se>
 
+       * testsuite/testutils.c (mpn_out_str): New function, needed to
+       replace uses of gmp_fprintf.
+
        * testsuite/ecc-sqrt-test.c (mpz_ui_kronecker)
        [NETTLE_USE_MINI_GMP]: New fallback definition when building with
        mini-gmp.

diff --git a/testsuite/testutils.c b/testsuite/testutils.c
index b08f726eea468c2b1e45fcee79ad5fac1e6798a1..92b6efcfcc26eb0209a45b17945b22d22d6f5e90 100644 (file)
--- a/testsuite/testutils.c
+++ b/testsuite/testutils.c
@@ -699,6 +699,13 @@ mpn_zero_p (mp_srcptr ap, mp_size_t n)
 }
 #endif
 
+void
+mpn_out_str (FILE *f, int base, const mp_limb_t *xp, mp_size_t xn)
+{
+  mpz_t x;
+  mpz_out_str (f, base, mpz_roinit_n (x, xp, xn));
+}
+
 #if NETTLE_USE_MINI_GMP
 void
 gmp_randinit_default (struct knuth_lfib_ctx *ctx)

diff --git a/testsuite/testutils.h b/testsuite/testutils.h
index b32f76b3dcfd4e3f4fa50a9afbe70efae54a56fa..405f89f6ab77e03fd837c4cd10939e23eb107883 100644 (file)
--- a/testsuite/testutils.h
+++ b/testsuite/testutils.h
@@ -165,6 +165,9 @@ int
 mpn_zero_p (mp_srcptr ap, mp_size_t n);
 #endif
 
+void
+mpn_out_str (FILE *f, int base, const mp_limb_t *xp, mp_size_t xn);
+
 #if NETTLE_USE_MINI_GMP
 typedef struct knuth_lfib_ctx gmp_randstate_t[1];