From ea2c300a1f3b8b8c6bc26bd4429611048eb22c78 Mon Sep 17 00:00:00 2001 From: fredrik Date: Mon, 17 Sep 2018 11:33:49 +0900 Subject: [PATCH] fix fallback code for sub_dddmmmsss --- acb/approx_dot.c | 2 +- acb/dot.c | 2 +- arb/approx_dot.c | 3 +-- arb/dot.c | 2 +- 4 files changed, 4 insertions(+), 5 deletions(-) diff --git a/acb/approx_dot.c b/acb/approx_dot.c index 2d0df3ee..ed6cc247 100644 --- a/acb/approx_dot.c +++ b/acb/approx_dot.c @@ -73,7 +73,7 @@ mp_limb_t __t, __u; \ sub_ddmmss(__t, dl, (mp_limb_t) 0, ml, (mp_limb_t) 0, sl); \ sub_ddmmss(__u, dm, (mp_limb_t) 0, mm, (mp_limb_t) 0, sm); \ - sub_ddmmss(dh, dm, mh - sh, dm, __u, __t); \ + sub_ddmmss(dh, dm, mh - sh, dm, -__u, -__t); \ } while (0) #endif diff --git a/acb/dot.c b/acb/dot.c index 093568eb..3f0b8546 100644 --- a/acb/dot.c +++ b/acb/dot.c @@ -73,7 +73,7 @@ mp_limb_t __t, __u; \ sub_ddmmss(__t, dl, (mp_limb_t) 0, ml, (mp_limb_t) 0, sl); \ sub_ddmmss(__u, dm, (mp_limb_t) 0, mm, (mp_limb_t) 0, sm); \ - sub_ddmmss(dh, dm, mh - sh, dm, __u, __t); \ + sub_ddmmss(dh, dm, mh - sh, dm, -__u, -__t); \ } while (0) #endif diff --git a/arb/approx_dot.c b/arb/approx_dot.c index 76f98e97..225246d8 100644 --- a/arb/approx_dot.c +++ b/arb/approx_dot.c @@ -74,12 +74,11 @@ mp_limb_t __t, __u; \ sub_ddmmss(__t, dl, (mp_limb_t) 0, ml, (mp_limb_t) 0, sl); \ sub_ddmmss(__u, dm, (mp_limb_t) 0, mm, (mp_limb_t) 0, sm); \ - sub_ddmmss(dh, dm, mh - sh, dm, __u, __t); \ + sub_ddmmss(dh, dm, mh - sh, dm, -__u, -__t); \ } while (0) #endif - void _arb_dot_addmul_generic(mp_ptr sum, mp_ptr serr, mp_ptr tmp, mp_size_t sn, mp_srcptr xptr, mp_size_t xn, mp_srcptr yptr, mp_size_t yn, diff --git a/arb/dot.c b/arb/dot.c index 04598f3a..af9c6e1e 100644 --- a/arb/dot.c +++ b/arb/dot.c @@ -74,7 +74,7 @@ mp_limb_t __t, __u; \ sub_ddmmss(__t, dl, (mp_limb_t) 0, ml, (mp_limb_t) 0, sl); \ sub_ddmmss(__u, dm, (mp_limb_t) 0, mm, (mp_limb_t) 0, sm); \ - sub_ddmmss(dh, dm, mh - sh, dm, __u, __t); \ + sub_ddmmss(dh, dm, mh - sh, dm, -__u, -__t); \ } while (0) #endif