@@ -120,7 +120,7 @@ static const REBCNT P26_1[] = {3825205247u, 3704098002u, 5421010u};
120
120
Computes max decimal shift left for nonzero significand a with length 3;
121
121
using double arithmetic;
122
122
*/
123
- INLINE REBINT max_shift_left (const REBCNT a []) {
123
+ REBINT max_shift_left (const REBCNT a []) {
124
124
REBINT i ;
125
125
i = (REBINT )(log10 ((a [2 ] * two_to_32 + a [1 ]) * two_to_32 + a [0 ]) + 0.5 );
126
126
return m_cmp (3 , P [i ], a ) <= 0 ? 25 - i : 26 - i ;
@@ -161,7 +161,7 @@ static const REBCNT Q[][6] = {
161
161
to fit length 3;
162
162
using double arithmetic;
163
163
*/
164
- INLINE REBINT min_shift_right (const REBCNT a [6 ]) {
164
+ REBINT min_shift_right (const REBCNT a [6 ]) {
165
165
REBINT i ;
166
166
if (m_cmp (6 , a , P26 ) < 0 ) return 0 ;
167
167
i = (REBINT ) (log10 (
@@ -281,7 +281,7 @@ INLINE void m_multiply_1 (REBINT n, REBCNT p[], const REBCNT a[], REBCNT b) {
281
281
a must be longer than the complete result;
282
282
n is the initial length of a;
283
283
*/
284
- INLINE void dsl (REBINT n , REBCNT a [], REBINT shift ) {
284
+ void dsl (REBINT n , REBCNT a [], REBINT shift ) {
285
285
REBINT shift1 ;
286
286
for (; shift > 0 ; shift -= shift1 ) {
287
287
shift1 = 9 <= shift ? 9 : shift ;
@@ -335,7 +335,7 @@ INLINE REBCNT m_divide_1 (REBINT n, REBCNT q[], const REBCNT a[], REBCNT b) {
335
335
2 - exactly half of the least significant unit truncated
336
336
3 - more than half of the least significant unit truncated
337
337
*/
338
- INLINE void dsr (REBINT n , REBCNT a [], REBINT shift , REBINT * t_flag ) {
338
+ void dsr (REBINT n , REBCNT a [], REBINT shift , REBINT * t_flag ) {
339
339
REBCNT remainder , divisor ;
340
340
REBINT shift1 ;
341
341
for (; shift > 0 ; shift -= shift1 ) {
@@ -563,7 +563,7 @@ deci decimal_to_deci (REBDEC a) {
563
563
ta is a truncate flag as described above;
564
564
*f is supposed to be in range [-128; 127];
565
565
*/
566
- INLINE void m_ldexp (REBCNT a [4 ], REBINT * f , REBINT e , REBINT ta ) {
566
+ void m_ldexp (REBCNT a [4 ], REBINT * f , REBINT e , REBINT ta ) {
567
567
/* take care of zero significand */
568
568
if (m_is_zero (3 , a )) {
569
569
* f = 0 ;
0 commit comments