From f172b9d38db426d2b102c0f9c1fd58672acc6c9b Mon Sep 17 00:00:00 2001 From: Jakub Jelinek Date: Thu, 9 Nov 2023 09:14:07 +0100 Subject: libgcc: Add {unsigned ,}__int128 <-> _Decimal{32,64,128} conversion support [PR65833] The following patch adds the missing {unsigned ,}__int128 <-> _Decimal{32,64,128} conversion support into libgcc.a on top of the _BitInt support (doing it without that would be larger amount of code and I hope all the targets which support __int128 will eventually support _BitInt, after all it is a required part of C23) and because it is in libgcc.a only, it doesn't hurt that much if it is added for some architectures only in GCC 15. Initially I thought about doing this on the compiler side, but doing it on the library side seems to be easier and more -Os friendly. The tests currently require bitint effective target, that can be removed when all the int128 targets support bitint. 2023-11-09 Jakub Jelinek PR libgcc/65833 libgcc/ * config/t-softfp (softfp_bid_list): Add {U,}TItype <-> _Decimal{32,64,128} conversions. * soft-fp/floattisd.c: New file. * soft-fp/floattidd.c: New file. * soft-fp/floattitd.c: New file. * soft-fp/floatuntisd.c: New file. * soft-fp/floatuntidd.c: New file. * soft-fp/floatuntitd.c: New file. * soft-fp/fixsdti.c: New file. * soft-fp/fixddti.c: New file. * soft-fp/fixtdti.c: New file. * soft-fp/fixunssdti.c: New file. * soft-fp/fixunsddti.c: New file. * soft-fp/fixunstdti.c: New file. gcc/testsuite/ * gcc.dg/dfp/int128-1.c: New test. * gcc.dg/dfp/int128-2.c: New test. * gcc.dg/dfp/int128-3.c: New test. * gcc.dg/dfp/int128-4.c: New test. --- libgcc/soft-fp/fixsdti.c | 53 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 53 insertions(+) create mode 100644 libgcc/soft-fp/fixsdti.c (limited to 'libgcc/soft-fp/fixsdti.c') diff --git a/libgcc/soft-fp/fixsdti.c b/libgcc/soft-fp/fixsdti.c new file mode 100644 index 0000000..8477ace --- /dev/null +++ b/libgcc/soft-fp/fixsdti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal32 to 128bit signed integer. + + Copyright (C) 2023 Free Software Foundation, Inc. + +This file is part of GCC. + +GCC is free software; you can redistribute it and/or modify it under +the terms of the GNU General Public License as published by the Free +Software Foundation; either version 3, or (at your option) any later +version. + +GCC is distributed in the hope that it will be useful, but WITHOUT ANY +WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +Under Section 7 of GPL version 3, you are granted additional +permissions described in the GCC Runtime Library Exception, version +3.1, as published by the Free Software Foundation. + +You should have received a copy of the GNU General Public License and +a copy of the GCC Runtime Library Exception along with this program; +see the files COPYING3 and COPYING.RUNTIME respectively. If not, see +. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixsdbitint (UBILtype *, SItype, _Decimal32); +extern TItype __bid_fixsdti (_Decimal32); + +TItype +__bid_fixsdti (_Decimal32 a) +{ + UBILtype rb[128 / BIL_TYPE_SIZE]; + __bid_fixsdbitint (rb, -128, a); +#if BIL_TYPE_SIZE == 128 + return rb[0]; +#elif BIL_TYPE_SIZE == 64 + return ((((UTItype) rb[BITINT_END (0, 1)]) << 64) + | rb[BITINT_END (1, 0)]); +#elif BIL_TYPE_SIZE == 32 + return ((((UTItype) rb[BITINT_END (0, 3)]) << 96) + | (((UTItype) rb[BITINT_END (1, 2)]) << 64) + | (((UTItype) rb[BITINT_END (2, 1)]) << 32) + | rb[BITINT_END (3, 0)]); +#else +#error Unsupported UBILtype +#endif +} +#endif -- cgit v1.1