diff options
Diffstat (limited to 'src/math/expm1.c')
| -rw-r--r-- | src/math/expm1.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/math/expm1.c b/src/math/expm1.c index 152c6c1e..40684b05 100644 --- a/src/math/expm1.c +++ b/src/math/expm1.c @@ -4,6 +4,12 @@ TYPE TGFN(expm1)(TYPE x) { + switch (fpclassify(x)) { + case FP_ZERO: return x; + case FP_INFINITE: return signbit(x) ? -1.0 : x; + default: break; + } + return x; } |