diff options
author | Kito Cheng <kito.cheng@sifive.com> | 2020-10-27 09:19:58 +0300 |
---|---|---|
committer | Corinna Vinschen <corinna@vinschen.de> | 2020-10-27 10:56:30 +0300 |
commit | b847c83294e0ffb93427a946bb49e88a9190c313 (patch) | |
tree | 7af05f5df96706901649ce33f22a6342f799f488 /newlib/libm/machine/riscv/s_finite.c | |
parent | b5f03509d1995e2a86b2dd337fe0e048fde67099 (diff) |
RISC-V: Implment finite and fpclassify
Diffstat (limited to 'newlib/libm/machine/riscv/s_finite.c')
-rw-r--r-- | newlib/libm/machine/riscv/s_finite.c | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/newlib/libm/machine/riscv/s_finite.c b/newlib/libm/machine/riscv/s_finite.c new file mode 100644 index 000000000..f5336e5dc --- /dev/null +++ b/newlib/libm/machine/riscv/s_finite.c @@ -0,0 +1,51 @@ +/* + * SPDX-License-Identifier: BSD-3-Clause + * + * Copyright (c) 2020 Kito Cheng + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * + * 2. Redistributions in binary form must reproduce the above + * copyright notice, this list of conditions and the following + * disclaimer in the documentation and/or other materials provided + * with the distribution. + * + * 3. Neither the name of the copyright holder nor the names of its + * contributors may be used to endorse or promote products derived + * from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS + * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT + * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS + * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE + * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, + * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES + * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, + * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED + * OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +/* + * finite(x) returns 1 is x is finite, else 0; + */ + +#include <math.h> + +#if defined(__riscv_flen) && __riscv_flen >= 64 +#include "riscv_math.h" +int finite(double x) +{ + long fclass = _fclass_d (x); + return (fclass & FCLASS_INF) == 0; +} +#else +#include "../../common/s_finite.c" +#endif |