ExternalVendorCode/corda
1
0
Fork 0
mirror of https://github.com/corda/corda.git synced 2025-06-17 06:38:21 +00:00
Code Issues Actions 2 Packages Projects Releases Wiki Activity

fix float to integer conversion

Browse Source 
Java requires that NaNs be converted to zero and that numbers at or
beyond the limits of integer representation be clamped to the largest
or smallest value that can be represented, respectively.
This commit is contained in:
Joel Dice
2012-08-12 14:31:58 -06:00
parent 47503854d5
commit b98abe3f94
6 changed files with 132 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
src/interpret.cpp
View File

@ -1078,11 +1078,28 @@ interpret3(Thread* t, const int base)
} goto loop;
case d2i: {
pushInt(t, static_cast<int32_t>(popDouble(t)));
double f = popDouble(t);
switch (fpclassify(f)) {
case FP_NAN: pushInt(t, 0); break;
case FP_INFINITE: pushInt(t, isinf(f) == 1 ? INT32_MAX : INT32_MIN); break;
default: pushInt
(t, f >= INT32_MAX ? INT32_MAX
: (f <= INT32_MIN ? INT32_MIN : static_cast<int32_t>(f)));
break;
}
} goto loop;
case d2l: {
pushLong(t, static_cast<int64_t>(popDouble(t)));
double f = popDouble(t);
switch (fpclassify(f)) {
case FP_NAN: pushLong(t, 0); break;
case FP_INFINITE: pushLong(t, isinf(f) == 1 ? INT64_MAX : INT64_MIN);
break;
default: pushLong
(t, f >= INT64_MAX ? INT64_MAX
: (f <= INT64_MIN ? INT64_MIN : static_cast<int64_t>(f)));
break;
}
} goto loop;
case dadd: {
@ -1278,11 +1295,24 @@ interpret3(Thread* t, const int base)
} goto loop;
case f2i: {
pushInt(t, static_cast<int32_t>(popFloat(t)));
float f = popFloat(t);
switch (fpclassify(f)) {
case FP_NAN: pushInt(t, 0); break;
case FP_INFINITE: pushInt(t, isinf(f) == 1 ? INT32_MAX : INT32_MIN); break;
default: pushInt(t, f >= INT32_MAX ? INT32_MAX
: (f <= INT32_MIN ? INT32_MIN : static_cast<int32_t>(f)));
break;
}
} goto loop;
case f2l: {
pushLong(t, static_cast<int64_t>(popFloat(t)));
float f = popFloat(t);
switch (fpclassify(f)) {
case FP_NAN: pushLong(t, 0); break;
case FP_INFINITE: pushLong(t, isinf(f) == 1 ? INT64_MAX : INT64_MIN);
break;
default: pushLong(t, static_cast<int64_t>(f)); break;
}
} goto loop;
case fadd: {