388 #define addmod2(r1, r0, a1, a0, b1, b0, n1, n0)                         \  argument
390     add_ssaaaa ((r1), (r0), (a1), (a0), (b1), (b0));                    \
391     if (ge2 ((r1), (r0), (n1), (n0)))                                   \
392       sub_ddmmss ((r1), (r0), (r1), (r0), (n1), (n0));                  \
394 #define submod2(r1, r0, a1, a0, b1, b0, n1, n0)                         \  argument
396     sub_ddmmss ((r1), (r0), (a1), (a0), (b1), (b0));                    \
398       add_ssaaaa ((r1), (r0), (r1), (r0), (n1), (n0));                  \
947 #define redcify2(r1, r0, x, n1, n0)                                     \  argument
967     (r0) = _r0;                                                         \
996   uintmax_t r1, r0, q, p1, t1, t0, s1, s0;  in mulredc2()  local
1017   umul_ppmm (r1, r0, a0, b1);  in mulredc2()
1021   r0 += (t0 != 0); /* Carry */  in mulredc2()
1022   add_ssaaaa (r1, r0, r1, r0, 0, p1);  in mulredc2()
1023   add_ssaaaa (r1, r0, r1, r0, 0, t1);  in mulredc2()
1024   add_ssaaaa (r1, r0, r1, r0, s1, s0);  in mulredc2()
1043   add_ssaaaa (t1, t0, t1, t0, 0, r0);  in mulredc2()
1045   add_ssaaaa (r1, r0, s1, s0, 0, r1);  in mulredc2()
1048   r0 += (t0 != 0); /* Carry */  in mulredc2()
1049   add_ssaaaa (r1, r0, r1, r0, 0, p1);  in mulredc2()
1050   add_ssaaaa (r1, r0, r1, r0, 0, t1);  in mulredc2()
1051   add_ssaaaa (r1, r0, r1, r0, s1, s0);  in mulredc2()
1053   if (ge2 (r1, r0, m1, m0))  in mulredc2()
1054     sub_ddmmss (r1, r0, r1, r0, m1, m0);  in mulredc2()
1057   return r0;  in mulredc2()
1086   uintmax_t r1, r0, b1, b0, n1, n0;  in powm2()  local
1095   r0 = one[0];  in powm2()
1102           r0 = mulredc2 (r1m, r1, r0, b1, b0, n1, n0, ni);  in powm2()
1112           r0 = mulredc2 (r1m, r1, r0, b1, b0, n1, n0, ni);  in powm2()
1119   return r0;  in powm2()