1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Get rid of implicit expansion to long double on ix86

Browse Source
This commit is contained in:
Nobuyoshi Nakada 2021-11-08 16:05:04 +09:00
parent 395738e8a5
commit 7cc4e147fc
No known key found for this signature in database
GPG Key ID: 7CD2805BFA3770C6
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
numeric.c
View File

@ -2546,7 +2546,7 @@ double
ruby_float_step_size(double beg, double end, double unit, int excl) ruby_float_step_size(double beg, double end, double unit, int excl)
{ {
const double epsilon = DBL_EPSILON; const double epsilon = DBL_EPSILON;
double n, err; double d, n, err;
if (unit == 0) { if (unit == 0) {
return HUGE_VAL; return HUGE_VAL;
@ -2563,24 +2563,26 @@ ruby_float_step_size(double beg, double end, double unit, int excl)
n = 0; n = 0;
else else
n = floor(n - err); n = floor(n - err);
d = +((n + 1) * unit) + beg;
if (beg < end) { if (beg < end) {
if ((n+1)*unit+beg < end) if (d < end)
n++; n++;
} }
else if (beg > end) { else if (beg > end) {
if ((n+1)*unit+beg > end) if (d > end)
n++; n++;
} }
} }
else { else {
if (n<0) return 0; if (n<0) return 0;
n = floor(n + err); n = floor(n + err);
d = +((n + 1) * unit) + beg;
if (beg < end) { if (beg < end) {
if ((n+1)*unit+beg <= end) if (d <= end)
n++; n++;
} }
else if (beg > end) { else if (beg > end) {
if ((n+1)*unit+beg >= end) if (d >= end)
n++; n++;
} }
} }