diff options
| author | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-03-25 08:38:10 +0000 |
|---|---|---|
| committer | pelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-03-25 08:38:10 +0000 |
| commit | 0fbb672d930f8ff50f8b6e77074aca1fb71feb2d (patch) | |
| tree | 74e54b485998fd0d75b9908b34cf3a07ea93255a /div-short.c | |
| parent | c9a6408c1b8813c7665f91be653a1037a6e78882 (diff) | |
| download | mpfr-0fbb672d930f8ff50f8b6e77074aca1fb71feb2d.tar.gz | |
Improved version.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3407 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'div-short.c')
| -rw-r--r-- | div-short.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/div-short.c b/div-short.c index 267e628cc..6a1d1df1d 100644 --- a/div-short.c +++ b/div-short.c @@ -193,6 +193,15 @@ check (int argc, const char *argv[]) if (mpn_cmp (qp, q2p, n) > 0) { printf ("QP > QP_high\n"); + if (n <= 10) + { + printf ("dp="); + for (i = n-1 ; i >= 0 ; i--) + printf (" %016Lx", (unsigned long) dp[i]); + printf ("\nn0p="); + for (i = 2*n-1 ; i >= 0 ; i--) + printf (" %016Lx", (unsigned long) n0p[i]); + } return; } mpn_sub_n (q2p, q2p, qp, n); |