factor: simplify add_ssaaaa default

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

diff --git a/src/factor.c b/src/factor.c
index 8d1a6fc5e54cad1255f76d2cf0b33ce72922dc38..6fd98bd65b192e7a4f104ce08a156e2bc4c40ee4 100644 (file)
--- 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.  */