kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

add spaces [ci skip]

Browse source
This commit is contained in:
卜部昌平 2020-06-15 10:40:52 +09:00
parent d060ebf83c
commit c47b805d8c
Notes: git 2020-06-29 11:07:08 +09:00
1 changed files with 14 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

14
enum.c
View file

@ -3853,6 +3853,7 @@ sum_iter_normalize_memo(struct enum_sum_memo *memo)
assert(FIXABLE(memo->n)); assert(FIXABLE(memo->n));
memo->v = rb_fix_plus(LONG2FIX(memo->n), memo->v); memo->v = rb_fix_plus(LONG2FIX(memo->n), memo->v);
memo->n = 0; memo->n = 0;
/* r can be an Integer when mathn is loaded */ /* r can be an Integer when mathn is loaded */
switch (TYPE(memo->r)) { switch (TYPE(memo->r)) {
case T_FIXNUM: memo->v = rb_fix_plus(memo->r, memo->v); break; case T_FIXNUM: memo->v = rb_fix_plus(memo->r, memo->v); break;
@ -3863,6 +3864,7 @@ sum_iter_normalize_memo(struct enum_sum_memo *memo)
} }
memo->r = Qundef; memo->r = Qundef;
} }
static void static void
sum_iter_fixnum(VALUE i, struct enum_sum_memo *memo) sum_iter_fixnum(VALUE i, struct enum_sum_memo *memo)
{ {
@ -3872,11 +3874,13 @@ sum_iter_fixnum(VALUE i, struct enum_sum_memo *memo)
memo->n = 0; memo->n = 0;
} }
} }
static void static void
sum_iter_bignum(VALUE i, struct enum_sum_memo *memo) sum_iter_bignum(VALUE i, struct enum_sum_memo *memo)
{ {
memo->v = rb_big_plus(i, memo->v); memo->v = rb_big_plus(i, memo->v);
} }
static void static void
sum_iter_rational(VALUE i, struct enum_sum_memo *memo) sum_iter_rational(VALUE i, struct enum_sum_memo *memo)
{ {
@ -3887,11 +3891,13 @@ sum_iter_rational(VALUE i, struct enum_sum_memo *memo)
memo->r = rb_rational_plus(memo->r, i); memo->r = rb_rational_plus(memo->r, i);
} }
} }
static void static void
sum_iter_some_value(VALUE i, struct enum_sum_memo *memo) sum_iter_some_value(VALUE i, struct enum_sum_memo *memo)
{ {
memo->v = rb_funcallv(memo->v, idPLUS, 1, &i); memo->v = rb_funcallv(memo->v, idPLUS, 1, &i);
} }
static void static void
sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo) sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo)
{ {
@ -3900,6 +3906,7 @@ sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo)
* See http://link.springer.com/article/10.1007/s00607-005-0139-x * See http://link.springer.com/article/10.1007/s00607-005-0139-x
*/ */
double x; double x;
switch (TYPE(i)) { switch (TYPE(i)) {
case T_FLOAT: x = RFLOAT_VALUE(i); break; case T_FLOAT: x = RFLOAT_VALUE(i); break;
case T_FIXNUM: x = FIX2LONG(i); break; case T_FIXNUM: x = FIX2LONG(i); break;
@ -3911,7 +3918,9 @@ sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo)
sum_iter_some_value(i, memo); sum_iter_some_value(i, memo);
return; return;
} }
double f = memo->f; double f = memo->f;
if (isnan(f)) { if (isnan(f)) {
return; return;
} }
@ -3927,8 +3936,10 @@ sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo)
else if (isinf(f)) { else if (isinf(f)) {
return; return;
} }
double c = memo->c; double c = memo->c;
double t = f + x; double t = f + x;
if (fabs(f) >= fabs(x)) { if (fabs(f) >= fabs(x)) {
c += ((f - t) + x); c += ((f - t) + x);
} }
@ -3936,9 +3947,11 @@ sum_iter_Kahan_Babuska(VALUE i, struct enum_sum_memo *memo)
c += ((x - t) + f); c += ((x - t) + f);
} }
f = t; f = t;
memo->f = f; memo->f = f;
memo->c = c; memo->c = c;
} }
static void static void
sum_iter(VALUE i, struct enum_sum_memo *memo) sum_iter(VALUE i, struct enum_sum_memo *memo)
{ {
@ -3946,6 +3959,7 @@ sum_iter(VALUE i, struct enum_sum_memo *memo)
if (memo->block_given) { if (memo->block_given) {
i = rb_yield(i); i = rb_yield(i);
} }
if (memo->float_value) { if (memo->float_value) {
sum_iter_Kahan_Babuska(i, memo); sum_iter_Kahan_Babuska(i, memo);
} }