From 06696f40afe58a231e2531c8bf6d9f0dadb92e51 Mon Sep 17 00:00:00 2001 From: Jakob Kaivo Date: Sun, 3 Mar 2019 21:25:50 -0500 Subject: outline details from C18 annex F --- src/math/asin.c | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/math/asin.c') diff --git a/src/math/asin.c b/src/math/asin.c index 92dae8c8..a94338f5 100644 --- a/src/math/asin.c +++ b/src/math/asin.c @@ -6,11 +6,15 @@ /** arc sine **/ TYPE TGFN(asin)(TYPE x) { - if (x < -1.0 || x > 1.0) { + if (TGFN(fabs)(x) > 1.0) { errno = EDOM; /* ARGUMENT(x) is not in the range [-1, +1] */ return TGHUGE; } + if (fpclassify(x) == FP_ZERO) { + return x; + } + if (0) { errno = ERANGE; /* The result cannot be represented */ /* RETURN_FAILURE(CONSTANT(HUGE_VAL), A range error occurred); */ -- cgit v1.2.1