[Gmp-commit] /var/hg/gmp: 2 new changesets

mercurial at gmplib.org mercurial at gmplib.org
Sat Mar 12 09:36:19 CET 2011


details:   /var/hg/gmp/rev/e1002e177c49
changeset: 14044:e1002e177c49
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Sat Mar 12 09:35:34 2011 +0100
description:
Remove udiv_qrnnd_preinv1, etc.

details:   /var/hg/gmp/rev/000ed03abbac
changeset: 14045:000ed03abbac
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Sat Mar 12 09:36:17 2011 +0100
description:
Trivial merge.

diffstat:

 tune/common.c |  63 ++--------------------------------------------------------
 tune/speed.c  |   3 --
 2 files changed, 3 insertions(+), 63 deletions(-)

diffs (105 lines):

diff -r 8d1214489594 -r 000ed03abbac tune/common.c
--- a/tune/common.c	Sat Mar 12 01:44:21 2011 +0100
+++ b/tune/common.c	Sat Mar 12 09:36:17 2011 +0100
@@ -1025,21 +1025,21 @@
 double
 speed_mpn_addlsh_n_ip1 (struct speed_params *s)
 {
-  SPEED_ROUTINE_MPN_UNARY_1 (mpn_addlsh_n_ip1);
+  SPEED_ROUTINE_MPN_UNARY_1_CALL (mpn_addlsh_n_ip1 (wp, s->xp, s->size, 7));
 }
 #endif
 #if HAVE_NATIVE_mpn_addlsh_n_ip2
 double
 speed_mpn_addlsh_n_ip2 (struct speed_params *s)
 {
-  SPEED_ROUTINE_MPN_UNARY_1 (mpn_addlsh_n_ip2);
+  SPEED_ROUTINE_MPN_UNARY_1_CALL (mpn_addlsh_n_ip2 (wp, s->xp, s->size, 7));
 }
 #endif
 #if HAVE_NATIVE_mpn_sublsh_n_ip1
 double
 speed_mpn_sublsh_n_ip1 (struct speed_params *s)
 {
-  SPEED_ROUTINE_MPN_UNARY_1 (mpn_sublsh_n_ip1);
+  SPEED_ROUTINE_MPN_UNARY_1_CALL (mpn_sublsh_n_ip1 (wp, s->xp, s->size, 7));
 }
 #endif
 #if HAVE_NATIVE_mpn_rsblsh_n
@@ -2079,63 +2079,6 @@
 }
 
 double
-speed_udiv_qrnnd_preinv1 (struct speed_params *s)
-{
-  SPEED_ROUTINE_UDIV_QRNND_A (1);
-  {
-    udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv1 (q, r, r, q, d, dinv);
-  }
-  SPEED_ROUTINE_UDIV_QRNND_B;
-}
-
-double
-speed_udiv_qrnnd_preinv2 (struct speed_params *s)
-{
-  SPEED_ROUTINE_UDIV_QRNND_A (1);
-  {
-    udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv2 (q, r, r, q, d, dinv);
-  }
-  SPEED_ROUTINE_UDIV_QRNND_B;
-}
-
-double
-speed_udiv_qrnnd_preinv3 (struct speed_params *s)
-{
-  SPEED_ROUTINE_UDIV_QRNND_A (1);
-  {
-    udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-     udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-    udiv_qrnnd_preinv3 (q, r, r, q, d, dinv);
-  }
-  SPEED_ROUTINE_UDIV_QRNND_B;
-}
-
-double
 speed_udiv_qrnnd_c (struct speed_params *s)
 {
   SPEED_ROUTINE_UDIV_QRNND_A (1);
diff -r 8d1214489594 -r 000ed03abbac tune/speed.c
--- a/tune/speed.c	Sat Mar 12 01:44:21 2011 +0100
+++ b/tune/speed.c	Sat Mar 12 09:36:17 2011 +0100
@@ -478,9 +478,6 @@
   { "count_trailing_zeros", speed_count_trailing_zeros, FLAG_NODATA | FLAG_R_OPTIONAL },
 
   { "udiv_qrnnd",             speed_udiv_qrnnd,             FLAG_R_OPTIONAL },
-  { "udiv_qrnnd_preinv1",     speed_udiv_qrnnd_preinv1,     FLAG_R_OPTIONAL },
-  { "udiv_qrnnd_preinv2",     speed_udiv_qrnnd_preinv2,     FLAG_R_OPTIONAL },
-  { "udiv_qrnnd_preinv3",     speed_udiv_qrnnd_preinv3,     FLAG_R_OPTIONAL },
   { "udiv_qrnnd_c",           speed_udiv_qrnnd_c,           FLAG_R_OPTIONAL },
 #if HAVE_NATIVE_mpn_udiv_qrnnd
   { "mpn_udiv_qrnnd",         speed_mpn_udiv_qrnnd,         FLAG_R_OPTIONAL },


More information about the gmp-commit mailing list