From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 1 Jul 2025 10:34:21 +0000 (-0700)
Subject: factor: simplify add_ssaaaa default
X-Git-Tag: v9.8~201
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=a9a8e0db47eae81adf54f880acd4d892bc7ae960;p=thirdparty%2Fcoreutils.git

factor: simplify add_ssaaaa default

* src/factor.c (add_ssaaaa): Simplify default implementation.
---

diff --git a/src/factor.c b/src/factor.c
index 8d1a6fc5e5..6fd98bd65b 100644
--- a/src/factor.c
+++ b/src/factor.c
@@ -380,11 +380,7 @@ static void factor_up (struct factors *, mp_limb_t, mp_limb_t,
 /* Set (sh,sl) = (ah,al) + (bh,bl).  Overflow wraps around.  */
 #if !defined add_ssaaaa
 # define add_ssaaaa(sh, sl, ah, al, bh, bl)                             \
-  do {                                                                  \
-    mp_limb_t _add_x;							\
-    (sh) = (ah) + (bh) + ckd_add (&_add_x, al, bl);			\
-    (sl) = _add_x;                                                      \
-  } while (0)
+   ((sh) = (ah) + (bh) + ckd_add (&(sl), al, bl))
 #endif
 
 /* Set (rh,rl) = (ah,al) >> cnt, where 0 < cnt < W_TYPE_SIZE.  */