1 /* |
1 /* |
2 * Copyright (c) 2007, 2011, Oracle and/or its affiliates. All rights reserved. |
2 * Copyright (c) 2007, 2018, Oracle and/or its affiliates. All rights reserved. |
3 * Use is subject to license terms. |
3 * Use is subject to license terms. |
4 * |
4 * |
5 * This library is free software; you can redistribute it and/or |
5 * This library is free software; you can redistribute it and/or |
6 * modify it under the terms of the GNU Lesser General Public |
6 * modify it under the terms of the GNU Lesser General Public |
7 * License as published by the Free Software Foundation; either |
7 * License as published by the Free Software Foundation; either |
831 b0 = MP_DIGIT(&meth->irr,0); |
831 b0 = MP_DIGIT(&meth->irr,0); |
832 MP_ADD_CARRY_ZERO(b0, r0, r0, borrow); |
832 MP_ADD_CARRY_ZERO(b0, r0, r0, borrow); |
833 MP_ADD_CARRY(b1, r1, r1, borrow, borrow); |
833 MP_ADD_CARRY(b1, r1, r1, borrow, borrow); |
834 MP_ADD_CARRY(b2, r2, r2, borrow, borrow); |
834 MP_ADD_CARRY(b2, r2, r2, borrow, borrow); |
835 MP_ADD_CARRY(b3, r3, r3, borrow, borrow); |
835 MP_ADD_CARRY(b3, r3, r3, borrow, borrow); |
|
836 MP_ADD_CARRY(b4, r4, r4, borrow, borrow); |
836 } |
837 } |
837 MP_CHECKOK(s_mp_pad(r, 5)); |
838 MP_CHECKOK(s_mp_pad(r, 5)); |
838 MP_DIGIT(r, 4) = r4; |
839 MP_DIGIT(r, 4) = r4; |
839 MP_DIGIT(r, 3) = r3; |
840 MP_DIGIT(r, 3) = r3; |
840 MP_DIGIT(r, 2) = r2; |
841 MP_DIGIT(r, 2) = r2; |
906 MP_ADD_CARRY_ZERO(b0, r0, r0, borrow); |
907 MP_ADD_CARRY_ZERO(b0, r0, r0, borrow); |
907 MP_ADD_CARRY(b1, r1, r1, borrow, borrow); |
908 MP_ADD_CARRY(b1, r1, r1, borrow, borrow); |
908 MP_ADD_CARRY(b2, r2, r2, borrow, borrow); |
909 MP_ADD_CARRY(b2, r2, r2, borrow, borrow); |
909 MP_ADD_CARRY(b3, r3, r3, borrow, borrow); |
910 MP_ADD_CARRY(b3, r3, r3, borrow, borrow); |
910 MP_ADD_CARRY(b4, r4, r4, borrow, borrow); |
911 MP_ADD_CARRY(b4, r4, r4, borrow, borrow); |
|
912 MP_ADD_CARRY(b5, r5, r5, borrow, borrow); |
911 } |
913 } |
912 |
914 |
913 MP_CHECKOK(s_mp_pad(r, 6)); |
915 MP_CHECKOK(s_mp_pad(r, 6)); |
914 MP_DIGIT(r, 5) = r5; |
916 MP_DIGIT(r, 5) = r5; |
915 MP_DIGIT(r, 4) = r4; |
917 MP_DIGIT(r, 4) = r4; |