From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-3.1 required=5.0 tests=HEADER_FROM_DIFFERENT_DOMAINS, MAILING_LIST_MULTI,RCVD_IN_DNSWL_MED,RCVD_IN_MSPIKE_H4, RCVD_IN_MSPIKE_WL,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.4 Received: from second.openwall.net (second.openwall.net [193.110.157.125]) by inbox.vuxu.org (Postfix) with SMTP id 15CF22B295 for ; Fri, 14 Jun 2024 08:49:54 +0200 (CEST) Received: (qmail 19981 invoked by uid 550); 14 Jun 2024 06:49:50 -0000 Mailing-List: contact musl-help@lists.openwall.com; run by ezmlm Precedence: bulk List-Post: List-Help: List-Unsubscribe: List-Subscribe: List-ID: Reply-To: musl@lists.openwall.com Received: (qmail 19942 invoked from network); 14 Jun 2024 06:49:49 -0000 X-QQ-mid: bizesmtpsz6t1718347775tdomfwg X-QQ-Originating-IP: nDpTkQHVc41siPsY6QSibxIVZ/3i2O+4bCGTepHjJ4A= X-QQ-SSF: 0000000000000000000000000000000 X-QQ-GoodBg: 0 X-BIZMAIL-ID: 16845845201124642193 From: Meng Zhuo To: musl@lists.openwall.com Date: Fri, 14 Jun 2024 14:49:34 +0800 Message-Id: <20240614064934.657405-1-mzh@mzh.io> X-Mailer: git-send-email 2.39.2 MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-QQ-SENDSIZE: 520 Feedback-ID: bizesmtpsz:mzh.io:qybglogicsvrgz:qybglogicsvrgz5a-1 Subject: [musl] [PATCH] math: add riscv64 round/roundf --- Thanks Szabolcs and Markus! My first thought was the riscv fclass instruction. --- v4 -> v5: * Use single cmp+jmp do the check --- src/math/riscv64/round.c | 22 ++++++++++++++++++++++ src/math/riscv64/roundf.c | 22 ++++++++++++++++++++++ 2 files changed, 44 insertions(+) create mode 100644 src/math/riscv64/round.c create mode 100644 src/math/riscv64/roundf.c diff --git a/src/math/riscv64/round.c b/src/math/riscv64/round.c new file mode 100644 index 00000000..d6d24211 --- /dev/null +++ b/src/math/riscv64/round.c @@ -0,0 +1,22 @@ +#include +#include "libm.h" + +#if __riscv_flen >= 64 + +double round(double x) +{ + if (((asuint64(x) >> 52) & 0x7ff) >= 52+0x3ff) return x; + double tmp; + long long n; + __asm__ ("fcvt.l.d %0, %1, rmm" : "=r"(n) : "f"(x)); + __asm__ ("fcvt.d.l %0, %1" : "=f"(tmp) : "r"(n)); + // the sign bit is only copied to handle round(-0.0) + __asm__ ("fsgnj.d %0, %1, %2" : "=f"(x) : "f"(tmp), "f"(x)); + return x; +} + +#else + +#include "../round.c" + +#endif diff --git a/src/math/riscv64/roundf.c b/src/math/riscv64/roundf.c new file mode 100644 index 00000000..3104dde6 --- /dev/null +++ b/src/math/riscv64/roundf.c @@ -0,0 +1,22 @@ +#include +#include "libm.h" + +#if __riscv_flen >= 32 + +float roundf(float x) +{ + if (((asuint(x) >> 23) & 0xff) >= 23+0x7f) return x; + float tmp; + long n; + __asm__ ("fcvt.w.s %0, %1, rmm" : "=r"(n) : "f"(x)); + __asm__ ("fcvt.s.w %0, %1" : "=f"(tmp) : "r"(n)); + // the sign bit is only copied to handle round(-0.0) + __asm__ ("fsgnj.s %0, %1, %2" : "=f"(x) : "f"(tmp), "f"(x)); + return x; +} + +#else + +#include "../roundf.c" + +#endif -- 2.39.2