diff options
Diffstat (limited to 'libgcc')
| -rw-r--r-- | libgcc/config/t-softfp | 4 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixddti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixsdti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixtdti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixunsddti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixunssdti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/fixunstdti.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floattidd.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floattisd.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floattitd.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floatuntidd.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floatuntisd.c | 53 | ||||
| -rw-r--r-- | libgcc/soft-fp/floatuntitd.c | 53 |
13 files changed, 639 insertions, 1 deletions
diff --git a/libgcc/config/t-softfp b/libgcc/config/t-softfp index 093d925..a51ac7a 100644 --- a/libgcc/config/t-softfp +++ b/libgcc/config/t-softfp @@ -69,7 +69,9 @@ softfp_bid_list := ifeq ($(decimal_float),yes) ifeq ($(enable_decimal_float),bid) softfp_bid_list += bitintpow10 \ - $(foreach m,sd dd td,fix$(m)bitint floatbitint$(m)) + $(foreach m,sd dd td,fix$(m)bitint floatbitint$(m) \ + fix$(m)ti fixuns$(m)ti \ + floatti$(m) floatunti$(m)) endif endif diff --git a/libgcc/soft-fp/fixddti.c b/libgcc/soft-fp/fixddti.c new file mode 100644 index 0000000..c27ae8b --- /dev/null +++ b/libgcc/soft-fp/fixddti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal64 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixddbitint (UBILtype *, SItype, _Decimal64); +extern TItype __bid_fixddti (_Decimal64); + +TItype +__bid_fixddti (_Decimal64 a) +{ + UBILtype rb[128 / BIL_TYPE_SIZE]; + __bid_fixddbitint (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 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 +<http://www.gnu.org/licenses/>. */ + +#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 diff --git a/libgcc/soft-fp/fixtdti.c b/libgcc/soft-fp/fixtdti.c new file mode 100644 index 0000000..9ac1333 --- /dev/null +++ b/libgcc/soft-fp/fixtdti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal128 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixtdbitint (UBILtype *, SItype, _Decimal128); +extern TItype __bid_fixtdti (_Decimal128); + +TItype +__bid_fixtdti (_Decimal128 a) +{ + UBILtype rb[128 / BIL_TYPE_SIZE]; + __bid_fixtdbitint (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 diff --git a/libgcc/soft-fp/fixunsddti.c b/libgcc/soft-fp/fixunsddti.c new file mode 100644 index 0000000..7551e00 --- /dev/null +++ b/libgcc/soft-fp/fixunsddti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal64 to 128bit unsigned 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixddbitint (UBILtype *, SItype, _Decimal64); +extern UTItype __bid_fixunsddti (_Decimal64); + +UTItype +__bid_fixunsddti (_Decimal64 a) +{ + UBILtype rb[128 / BIL_TYPE_SIZE]; + __bid_fixddbitint (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 diff --git a/libgcc/soft-fp/fixunssdti.c b/libgcc/soft-fp/fixunssdti.c new file mode 100644 index 0000000..8d71b2c --- /dev/null +++ b/libgcc/soft-fp/fixunssdti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal32 to 128bit unsigned 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixsdbitint (UBILtype *, SItype, _Decimal32); +extern UTItype __bid_fixunssdti (_Decimal32); + +UTItype +__bid_fixunssdti (_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 diff --git a/libgcc/soft-fp/fixunstdti.c b/libgcc/soft-fp/fixunstdti.c new file mode 100644 index 0000000..41ae9741 --- /dev/null +++ b/libgcc/soft-fp/fixunstdti.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert _Decimal128 to 128bit unsigned 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern void __bid_fixtdbitint (UBILtype *, SItype, _Decimal128); +extern UTItype __bid_fixunstdti (_Decimal128); + +UTItype +__bid_fixunstdti (_Decimal128 a) +{ + UBILtype rb[128 / BIL_TYPE_SIZE]; + __bid_fixtdbitint (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 diff --git a/libgcc/soft-fp/floattidd.c b/libgcc/soft-fp/floattidd.c new file mode 100644 index 0000000..31ad9d0 --- /dev/null +++ b/libgcc/soft-fp/floattidd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit signed integer to _Decimal64. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal64 __bid_floatbitintdd (const UBILtype *, SItype); +extern _Decimal64 __bid_floattidd (TItype); + +_Decimal64 +__bid_floattidd (TItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitintdd (ib, -128); +} +#endif diff --git a/libgcc/soft-fp/floattisd.c b/libgcc/soft-fp/floattisd.c new file mode 100644 index 0000000..37a24a3 --- /dev/null +++ b/libgcc/soft-fp/floattisd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit signed integer to _Decimal32. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal32 __bid_floatbitintsd (const UBILtype *, SItype); +extern _Decimal32 __bid_floattisd (TItype); + +_Decimal32 +__bid_floattisd (TItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitintsd (ib, -128); +} +#endif diff --git a/libgcc/soft-fp/floattitd.c b/libgcc/soft-fp/floattitd.c new file mode 100644 index 0000000..edc0b37 --- /dev/null +++ b/libgcc/soft-fp/floattitd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit signed integer to _Decimal128. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal128 __bid_floatbitinttd (const UBILtype *, SItype); +extern _Decimal128 __bid_floattitd (TItype); + +_Decimal128 +__bid_floattitd (TItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitinttd (ib, -128); +} +#endif diff --git a/libgcc/soft-fp/floatuntidd.c b/libgcc/soft-fp/floatuntidd.c new file mode 100644 index 0000000..ea4108f --- /dev/null +++ b/libgcc/soft-fp/floatuntidd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit unsigned integer to _Decimal64. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal64 __bid_floatbitintdd (const UBILtype *, SItype); +extern _Decimal64 __bid_floatunstidd (UTItype); + +_Decimal64 +__bid_floatunstidd (UTItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitintdd (ib, 128); +} +#endif diff --git a/libgcc/soft-fp/floatuntisd.c b/libgcc/soft-fp/floatuntisd.c new file mode 100644 index 0000000..d907353e --- /dev/null +++ b/libgcc/soft-fp/floatuntisd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit unsigned integer to _Decimal32. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal32 __bid_floatbitintsd (const UBILtype *, SItype); +extern _Decimal32 __bid_floatunstisd (UTItype); + +_Decimal32 +__bid_floatunstisd (UTItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitintsd (ib, 128); +} +#endif diff --git a/libgcc/soft-fp/floatuntitd.c b/libgcc/soft-fp/floatuntitd.c new file mode 100644 index 0000000..5731f2a --- /dev/null +++ b/libgcc/soft-fp/floatuntitd.c @@ -0,0 +1,53 @@ +/* Software floating-point emulation. + Convert a 128bit unsigned integer to _Decimal128. + + 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 +<http://www.gnu.org/licenses/>. */ + +#include "soft-fp.h" +#include "bitint.h" + +#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__) +extern _Decimal128 __bid_floatbitinttd (const UBILtype *, SItype); +extern _Decimal128 __bid_floatunstitd (UTItype); + +_Decimal128 +__bid_floatunstitd (UTItype i) +{ + UBILtype ib[128 / BIL_TYPE_SIZE]; +#if BIL_TYPE_SIZE == 128 + ib[0] = i; +#elif BIL_TYPE_SIZE == 64 + ib[BITINT_END (0, 1)] = i >> 64; + ib[BITINT_END (1, 0)] = i; +#elif BIL_TYPE_SIZE == 32 + ib[BITINT_END (0, 3)] = i >> 96; + ib[BITINT_END (1, 2)] = i >> 64; + ib[BITINT_END (2, 1)] = i >> 32; + ib[BITINT_END (3, 0)] = i; +#else +#error Unsupported UBILtype +#endif + return __bid_floatbitinttd (ib, 128); +} +#endif |