diff options
| author | Jakob Kaivo <jkk@ung.org> | 2019-03-03 21:25:50 -0500 |
|---|---|---|
| committer | Jakob Kaivo <jkk@ung.org> | 2019-03-03 21:25:50 -0500 |
| commit | 06696f40afe58a231e2531c8bf6d9f0dadb92e51 (patch) | |
| tree | b146422c6326ffe3debf3163f0941d8dda0be105 /src/math/sin.c | |
| parent | f20eeea657d62f2ef905627ca3a9094d33af7d40 (diff) | |
outline details from C18 annex F
Diffstat (limited to 'src/math/sin.c')
| -rw-r--r-- | src/math/sin.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/math/sin.c b/src/math/sin.c index b753cecb..e93a663b 100644 --- a/src/math/sin.c +++ b/src/math/sin.c @@ -2,6 +2,7 @@ #include <math.h> #include "_tgmath.h" #include "errno.h" +#include "fenv.h" /** sine **/ TYPE TGFN(sin)(TYPE x) @@ -12,6 +13,12 @@ TYPE TGFN(sin)(TYPE x) TYPE sine = 0.0; TYPE power = 1.0; + switch (fpclassify(x)) { + case FP_ZERO: return x; + case FP_INFINITE: feraiseexcept(FE_INVALID); return NAN; + default: break; + } + if (0) { errno = ERANGE; /* The result cannot be represented */ /* RETURN_FAILURE(CONSTANT(HUGE_VAL), A range error occurred); */ |