Hello community,

here is the log from the commit of package gcc9 for openSUSE:Factory checked in 
at 2019-12-23 22:34:10
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/gcc9 (Old)
 and      /work/SRC/openSUSE:Factory/.gcc9.new.6675 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "gcc9"

Mon Dec 23 22:34:10 2019 rev:9 rq:755258 version:9.2.1+r279103

Changes:
--------
--- /work/SRC/openSUSE:Factory/gcc9/cross-aarch64-gcc9.changes  2019-09-23 
12:01:41.349962049 +0200
+++ /work/SRC/openSUSE:Factory/.gcc9.new.6675/cross-aarch64-gcc9.changes        
2019-12-23 22:34:42.613749156 +0100
@@ -1,0 +2,21 @@
+Mon Dec  9 10:46:24 UTC 2019 - Richard Biener <rguent...@suse.com>
+
+- Update to gcc-9-branch head (r279103).
+  * Includes gcc9-pr91772.patch
+
+-------------------------------------------------------------------
+Mon Oct  7 16:37:37 UTC 2019 - m...@suse.com
+
+- Refresh gcc48-remove-mpfr-2.4.0-requirement.patch to apply
+  again.
+- Use new license and header also in gcc.spec.in to reduce churn
+  with format_spec_file.
+- Use BuildRoot tag again for old distros (SLE-11).
+
+-------------------------------------------------------------------
+Fri Oct  4 08:45:43 UTC 2019 - Richard Biener <rguent...@suse.com>
+
+- Make cross-arm-gcc a gcc_icecream cross.  Remove the disabling
+  of debuginfo stripping.  [bsc#1152590]
+
+-------------------------------------------------------------------
cross-arm-gcc9.changes: same change
cross-arm-none-gcc9-bootstrap.changes: same change
cross-arm-none-gcc9.changes: same change
cross-avr-gcc9-bootstrap.changes: same change
cross-avr-gcc9.changes: same change
cross-epiphany-gcc9-bootstrap.changes: same change
cross-epiphany-gcc9.changes: same change
cross-hppa-gcc9.changes: same change
cross-i386-gcc9.changes: same change
cross-m68k-gcc9.changes: same change
cross-mips-gcc9.changes: same change
cross-nvptx-gcc9.changes: same change
cross-ppc64-gcc9.changes: same change
cross-ppc64le-gcc9.changes: same change
cross-riscv64-elf-gcc9-bootstrap.changes: same change
cross-riscv64-elf-gcc9.changes: same change
cross-riscv64-gcc9.changes: same change
cross-rx-gcc9-bootstrap.changes: same change
cross-rx-gcc9.changes: same change
cross-s390x-gcc9.changes: same change
cross-sparc-gcc9.changes: same change
cross-sparc64-gcc9.changes: same change
cross-x86_64-gcc9.changes: same change
gcc9-testresults.changes: same change
gcc9.changes: same change

Old:
----
  gcc-9.2.1+r275327.tar.xz
  gcc9-pr91772.patch

New:
----
  gcc-9.2.1+r279103.tar.xz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ cross-aarch64-gcc9.spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:25.733767863 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:25.737767865 +0100
@@ -114,11 +114,14 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:            https://gcc.gnu.org/
-Version:        9.2.1+r275327
+Version:        9.2.1+r279103
 Release:        0
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
 %define binsuffix -9
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Source:         gcc-%{version}.tar.xz
 Source1:        change_spec
 Source2:        gcc9-rpmlintrc
@@ -138,7 +141,6 @@
 Patch19:        gcc9-add-flto=auto.patch
 Patch20:        gcc9-pr91307.patch
 Patch21:        gcc9-autodetect-g-at-lto-link.patch
-Patch22:        gcc9-pr91772.patch
 Patch23:        gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:        gcc41-ppc32-retaddr.patch
@@ -285,7 +287,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60
@@ -633,17 +634,10 @@
 rm -f $RPM_BUILD_ROOT%{_libdir}/libiberty.a
 
 # install and fixup target parts
-# debugedit is not prepared for this and crashes
 %if 0%{?gcc_icecream:1}
 # so expect the sysroot to be populated from natively built binaries
 %else
 %if 0%{!?gcc_libc_bootstrap:1}
-export NO_BRP_STRIP_DEBUG=true
-export NO_DEBUGINFO_STRIP_DEBUG=true
-%define __debug_install_post %{nil}
-: >../debugfiles.list
-: >../debugsourcefiles.list
-: >../debugsources.list
 # We want shared libraries to reside in the sysroot but the .so symlinks
 # on the host.  Once we have a cross target that has shared libs we need
 # to manually fix up things here like we do for non-cross compilers

++++++ cross-arm-gcc9.spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:25.753767871 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:25.753767871 +0100
@@ -19,7 +19,7 @@
 %define pkgname cross-arm-gcc9
 %define cross_arch arm
 %define gcc_target_arch arm-suse-linux-gnueabi
-%define gcc_icecream 0
+%define gcc_icecream 1
 #
 # spec file for package gcc (Version 4.0.1)
 #
@@ -114,11 +114,14 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:            https://gcc.gnu.org/
-Version:        9.2.1+r275327
+Version:        9.2.1+r279103
 Release:        0
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
 %define binsuffix -9
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Source:         gcc-%{version}.tar.xz
 Source1:        change_spec
 Source2:        gcc9-rpmlintrc
@@ -138,7 +141,6 @@
 Patch19:        gcc9-add-flto=auto.patch
 Patch20:        gcc9-pr91307.patch
 Patch21:        gcc9-autodetect-g-at-lto-link.patch
-Patch22:        gcc9-pr91772.patch
 Patch23:        gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:        gcc41-ppc32-retaddr.patch
@@ -285,7 +287,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60
@@ -633,17 +634,10 @@
 rm -f $RPM_BUILD_ROOT%{_libdir}/libiberty.a
 
 # install and fixup target parts
-# debugedit is not prepared for this and crashes
 %if 0%{?gcc_icecream:1}
 # so expect the sysroot to be populated from natively built binaries
 %else
 %if 0%{!?gcc_libc_bootstrap:1}
-export NO_BRP_STRIP_DEBUG=true
-export NO_DEBUGINFO_STRIP_DEBUG=true
-%define __debug_install_post %{nil}
-: >../debugfiles.list
-: >../debugsourcefiles.list
-: >../debugsources.list
 # We want shared libraries to reside in the sysroot but the .so symlinks
 # on the host.  Once we have a cross target that has shared libs we need
 # to manually fix up things here like we do for non-cross compilers

++++++ cross-arm-none-gcc9-bootstrap.spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:25.777767882 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:25.781767884 +0100
@@ -115,11 +115,14 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:            https://gcc.gnu.org/
-Version:        9.2.1+r275327
+Version:        9.2.1+r279103
 Release:        0
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
 %define binsuffix -9
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Source:         gcc-%{version}.tar.xz
 Source1:        change_spec
 Source2:        gcc9-rpmlintrc
@@ -139,7 +142,6 @@
 Patch19:        gcc9-add-flto=auto.patch
 Patch20:        gcc9-pr91307.patch
 Patch21:        gcc9-autodetect-g-at-lto-link.patch
-Patch22:        gcc9-pr91772.patch
 Patch23:        gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:        gcc41-ppc32-retaddr.patch
@@ -286,7 +288,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60
@@ -634,17 +635,10 @@
 rm -f $RPM_BUILD_ROOT%{_libdir}/libiberty.a
 
 # install and fixup target parts
-# debugedit is not prepared for this and crashes
 %if 0%{?gcc_icecream:1}
 # so expect the sysroot to be populated from natively built binaries
 %else
 %if 0%{!?gcc_libc_bootstrap:1}
-export NO_BRP_STRIP_DEBUG=true
-export NO_DEBUGINFO_STRIP_DEBUG=true
-%define __debug_install_post %{nil}
-: >../debugfiles.list
-: >../debugsourcefiles.list
-: >../debugsources.list
 # We want shared libraries to reside in the sysroot but the .so symlinks
 # on the host.  Once we have a cross target that has shared libs we need
 # to manually fix up things here like we do for non-cross compilers

cross-arm-none-gcc9.spec: same change
cross-avr-gcc9-bootstrap.spec: same change
cross-avr-gcc9.spec: same change
cross-epiphany-gcc9-bootstrap.spec: same change
cross-epiphany-gcc9.spec: same change
cross-hppa-gcc9.spec: same change
cross-i386-gcc9.spec: same change
cross-m68k-gcc9.spec: same change
cross-mips-gcc9.spec: same change
cross-nvptx-gcc9.spec: same change
cross-ppc64-gcc9.spec: same change
cross-ppc64le-gcc9.spec: same change
cross-riscv64-elf-gcc9-bootstrap.spec: same change
cross-riscv64-elf-gcc9.spec: same change
cross-riscv64-gcc9.spec: same change
cross-rx-gcc9-bootstrap.spec: same change
cross-rx-gcc9.spec: same change
cross-s390x-gcc9.spec: same change
cross-sparc-gcc9.spec: same change
cross-sparc64-gcc9.spec: same change
cross-x86_64-gcc9.spec: same change
++++++ gcc9-testresults.spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.297768107 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.301768109 +0100
@@ -31,7 +31,7 @@
 # license that conforms to the Open Source Definition (Version 1.9)
 # published by the Open Source Initiative.
 
-# Please submit bugfixes or comments via http://bugs.opensuse.org/
+# Please submit bugfixes or comments via https://bugs.opensuse.org/
 #
 
 # nospeccleaner
@@ -264,7 +264,7 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:            https://gcc.gnu.org/
-Version:        9.2.1+r275327
+Version:        9.2.1+r279103
 Release:        0
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
@@ -304,6 +304,9 @@
 Suggests:       gcc9-info gcc9-locale
 %endif
 
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Source:         gcc-%{version}.tar.xz
 Source1:        change_spec
 Source2:        gcc9-rpmlintrc
@@ -323,7 +326,6 @@
 Patch19:        gcc9-add-flto=auto.patch
 Patch20:        gcc9-pr91307.patch
 Patch21:        gcc9-autodetect-g-at-lto-link.patch
-Patch22:        gcc9-pr91772.patch
 Patch23:        gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:        gcc41-ppc32-retaddr.patch
@@ -456,7 +458,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60

++++++ gcc9.spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.321768118 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.325768120 +0100
@@ -246,7 +246,7 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:            https://gcc.gnu.org/
-Version:        9.2.1+r275327
+Version:        9.2.1+r279103
 Release:        0
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
@@ -286,6 +286,9 @@
 Suggests:       gcc9-info gcc9-locale
 %endif
 
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Source:         gcc-%{version}.tar.xz
 Source1:        change_spec
 Source2:        gcc9-rpmlintrc
@@ -305,7 +308,6 @@
 Patch19:        gcc9-add-flto=auto.patch
 Patch20:        gcc9-pr91307.patch
 Patch21:        gcc9-autodetect-g-at-lto-link.patch
-Patch22:        gcc9-pr91772.patch
 Patch23:        gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:        gcc41-ppc32-retaddr.patch
@@ -1783,7 +1785,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60

++++++ change_spec ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.369768139 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.373768140 +0100
@@ -94,7 +94,7 @@
 # For now keep the old way of doing things
 if test "$do_crosses" = 1 ; then
 add_cross cross-aarch64-gcc$base_ver aarch64 aarch64-suse-linux %define 
gcc_icecream 1
-add_cross cross-arm-gcc$base_ver arm arm-suse-linux-gnueabi %define 
gcc_icecream 0
+add_cross cross-arm-gcc$base_ver arm arm-suse-linux-gnueabi %define 
gcc_icecream 1
 add_cross cross-avr-gcc$base_ver-bootstrap avr avr "%define gcc_libc_bootstrap 
1"
 add_cross cross-avr-gcc$base_ver avr avr
 add_cross cross-i386-gcc$base_ver i386 i586-suse-linux %define gcc_icecream 1

++++++ cross.spec.in ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.441768170 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.441768170 +0100
@@ -217,17 +217,10 @@
 
 
 # install and fixup target parts
-# debugedit is not prepared for this and crashes
 %if 0%{?gcc_icecream:1}
 # so expect the sysroot to be populated from natively built binaries
 %else
 %if 0%{!?gcc_libc_bootstrap:1}
-export NO_BRP_STRIP_DEBUG=true
-export NO_DEBUGINFO_STRIP_DEBUG=true
-%define __debug_install_post %{nil}
-: >../debugfiles.list
-: >../debugsourcefiles.list
-: >../debugsources.list
 # We want shared libraries to reside in the sysroot but the .so symlinks
 # on the host.  Once we have a cross target that has shared libs we need
 # to manually fix up things here like we do for non-cross compilers

++++++ gcc-9.2.1+r275327.tar.xz -> gcc-9.2.1+r279103.tar.xz ++++++
/work/SRC/openSUSE:Factory/gcc9/gcc-9.2.1+r275327.tar.xz 
/work/SRC/openSUSE:Factory/.gcc9.new.6675/gcc-9.2.1+r279103.tar.xz differ: char 
27, line 1

++++++ gcc.spec.in ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.473768184 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.473768184 +0100
@@ -12,7 +12,7 @@
 # license that conforms to the Open Source Definition (Version 1.9)
 # published by the Open Source Initiative.
 
-# Please submit bugfixes or comments via http://bugs.opensuse.org/
+# Please submit bugfixes or comments via https://bugs.opensuse.org/
 #
 
 # nospeccleaner
@@ -250,7 +250,7 @@
 %define biarch_targets x86_64 s390x powerpc64 powerpc sparc sparc64
 
 URL:          https://gcc.gnu.org/
-Version: 9.2.1+r275327
+Version: 9.2.1+r279103
 Release:      1
 %define gcc_dir_version %(echo %version |  sed 's/+.*//' | cut -d '.' -f 1)
 %define gcc_snapshot_revision %(echo %version | sed 's/[3-9]\.[0-9]\.[0-6]//' 
| sed 's/+/-/')
@@ -291,6 +291,9 @@
 %endif
 
 # SRC-COMMON-BEGIN
+%if %{suse_version} < 1310
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+%endif
 Group:         Development/Languages/C and C++
 Source:                gcc-%{version}.tar.xz
 Source1:       change_spec
@@ -311,7 +314,6 @@
 Patch19:       gcc9-add-flto=auto.patch
 Patch20:       gcc9-pr91307.patch
 Patch21:       gcc9-autodetect-g-at-lto-link.patch
-Patch22:       gcc9-pr91772.patch
 Patch23:       gcc9-pr91763.patch
 # A set of patches from the RH srpm
 Patch51:       gcc41-ppc32-retaddr.patch
@@ -542,7 +544,7 @@
 
 %package info
 Summary:      Documentation for the GNU compiler collection
-License:      GFDL-1.2
+License:      GFDL-1.2-only
 Group:        Documentation/Other
 PreReq:       %{install_info_prereq}
 %if 0%{?suse_version} >= 1120
@@ -691,7 +693,7 @@
 # PACKAGE-BEGIN
 %package -n libquadmath%{libquadmath_sover}%{libquadmath_suffix}@variant@
 Summary:      The GNU Fortran Compiler Quadmath Runtime Library
-License:        LGPL-2.1
+License:        LGPL-2.1-only
 Group:        Development/Languages/Fortran
 Provides:      libquadmath%{libquadmath_sover}@variant@ = %{version}-%{release}
 # Only one package may provide this - allows multiple gcc versions
@@ -1069,7 +1071,6 @@
 %patch19 -p1
 %patch20
 %patch21
-%patch22
 %patch23
 %patch51
 %patch60

++++++ gcc48-remove-mpfr-2.4.0-requirement.patch ++++++
--- /var/tmp/diff_new_pack.oqJuri/_old  2019-12-23 22:35:26.489768191 +0100
+++ /var/tmp/diff_new_pack.oqJuri/_new  2019-12-23 22:35:26.489768191 +0100
@@ -1,8 +1,8 @@
 Index: configure.ac
 ===================================================================
---- configure.ac       (revision 216911)
-+++ configure.ac       (working copy)
-@@ -1454,7 +1454,7 @@ if test -d ${srcdir}/gcc && test "x$have
+--- configure.ac.orig  2019-10-07 18:32:31.000000000 +0200
++++ configure.ac       2019-10-07 18:34:36.000000000 +0200
+@@ -1542,7 +1542,7 @@ if test -d ${srcdir}/gcc && test "x$have
      AC_MSG_CHECKING([for the correct version of mpfr.h])
      AC_TRY_COMPILE([#include <gmp.h>
      #include <mpfr.h>],[
@@ -13,9 +13,9 @@
      ], [AC_TRY_COMPILE([#include <gmp.h>
 Index: configure
 ===================================================================
---- configure  (revision 216911)
-+++ configure  (working copy)
-@@ -5524,7 +5524,7 @@ int
+--- configure.orig     2019-10-07 18:32:31.000000000 +0200
++++ configure  2019-10-07 18:34:36.000000000 +0200
+@@ -5692,7 +5692,7 @@ int
  main ()
  {
  
@@ -26,116 +26,9 @@
  
 Index: gcc/fortran/simplify.c
 ===================================================================
---- gcc/fortran/simplify.c     (revision 216911)
-+++ gcc/fortran/simplify.c     (working copy)
-@@ -4278,10 +4278,7 @@ gfc_simplify_mod (gfc_expr *a, gfc_expr
-           return &gfc_bad_expr;
-         }
- 
--      gfc_set_model_kind (kind);
--      mpfr_fmod (result->value.real, a->value.real, p->value.real,
--                 GFC_RND_MODE);
--      break;
-+      return NULL;
- 
-       default:
-       gfc_internal_error ("gfc_simplify_mod(): Bad arguments");
-@@ -4327,19 +4324,7 @@ gfc_simplify_modulo (gfc_expr *a, gfc_ex
-           return &gfc_bad_expr;
-         }
- 
--      gfc_set_model_kind (kind);
--      mpfr_fmod (result->value.real, a->value.real, p->value.real,
--                 GFC_RND_MODE);
--      if (mpfr_cmp_ui (result->value.real, 0) != 0)
--        {
--          if (mpfr_signbit (a->value.real) != mpfr_signbit (p->value.real))
--            mpfr_add (result->value.real, result->value.real, p->value.real,
--                      GFC_RND_MODE);
--        }
--      else
--        mpfr_copysign (result->value.real, result->value.real,
--                       p->value.real, GFC_RND_MODE);
--      break;
-+      return NULL;
- 
-       default:
-       gfc_internal_error ("gfc_simplify_modulo(): Bad arguments");
-Index: gcc/ubsan.c
-===================================================================
---- gcc/ubsan.c.orig   2015-06-01 14:52:11.717105684 +0200
-+++ gcc/ubsan.c        2015-06-01 14:52:26.945253071 +0200
-@@ -1564,40 +1564,6 @@
-         min = build_real (expr_type, minval2);
-       }
-     }
--  else if (REAL_MODE_FORMAT (mode)->b == 10)
--    {
--      /* For _Decimal128 up to 34 decimal digits, - sign,
--       dot, e, exponent.  */
--      char buf[64];
--      mpfr_t m;
--      int p = REAL_MODE_FORMAT (mode)->p;
--      REAL_VALUE_TYPE maxval, minval;
--
--      /* Use mpfr_snprintf rounding to compute the smallest
--       representable decimal number greater or equal than
--       1 << (prec - !uns_p).  */
--      mpfr_init2 (m, prec + 2);
--      mpfr_set_ui_2exp (m, 1, prec - !uns_p, GMP_RNDN);
--      mpfr_snprintf (buf, sizeof buf, "%.*RUe", p - 1, m);
--      decimal_real_from_string (&maxval, buf);
--      max = build_real (expr_type, maxval);
--
--      /* For unsigned, assume -1.0 is always representable.  */
--      if (uns_p)
--      min = build_minus_one_cst (expr_type);
--      else
--      {
--        /* Use mpfr_snprintf rounding to compute the largest
--           representable decimal number less or equal than
--           (-1 << (prec - 1)) - 1.  */
--        mpfr_set_si_2exp (m, -1, prec - 1, GMP_RNDN);
--        mpfr_sub_ui (m, m, 1, GMP_RNDN);
--        mpfr_snprintf (buf, sizeof buf, "%.*RDe", p - 1, m);
--        decimal_real_from_string (&minval, buf);
--        min = build_real (expr_type, minval);
--      }
--      mpfr_clear (m);
--    }
-   else
-     return NULL_TREE;
- 
-Index: gcc/gimple-ssa-sprintf.c
-===================================================================
---- gcc/gimple-ssa-sprintf.c   (revision 257728)
-+++ gcc/gimple-ssa-sprintf.c   (working copy)
-@@ -1637,18 +1637,7 @@ get_mpfr_format_length (mpfr_ptr x, cons
-       p = 1024;
-     }
- 
--  len = mpfr_snprintf (NULL, 0, fmtstr, (int)p, x);
--
--  /* Handle the unlikely (impossible?) error by returning more than
--     the maximum dictated by the function's return type.  */
--  if (len < 0)
--    return target_dir_max () + 1;
--
--  /* Adjust the return value by the difference.  */
--  if (p < prec)
--    len += prec - p;
--
--  return len;
-+  return target_dir_max () + 1;
- }
- 
- /* Return the number of bytes to format using the format specifier
-
-Index: gcc/fortran/simplify.c
-===================================================================
---- gcc/fortran/simplify.c     (revision 257983)
-+++ gcc/fortran/simplify.c     (working copy)
-@@ -1745,51 +1745,6 @@ simplify_trig_call (gfc_expr *icall)
+--- gcc/fortran/simplify.c.orig        2019-09-03 09:48:46.000000000 +0200
++++ gcc/fortran/simplify.c     2019-10-07 18:36:00.000000000 +0200
+@@ -1791,51 +1791,6 @@ simplify_trig_call (gfc_expr *icall)
      }
  }
  
@@ -187,7 +80,7 @@
  
  /* Convert argument to radians before calling a trig function.  */
  
-@@ -1803,12 +1758,7 @@ gfc_simplify_trigd (gfc_expr *icall)
+@@ -1849,12 +1804,7 @@ gfc_simplify_trigd (gfc_expr *icall)
    if (arg->ts.type != BT_REAL)
      gfc_internal_error ("in gfc_simplify_trigd(): Bad type");
  
@@ -201,7 +94,7 @@
  }
  
  /* Convert result of an inverse trig function to degrees.  */
-@@ -1816,21 +1766,9 @@ gfc_simplify_trigd (gfc_expr *icall)
+@@ -1862,21 +1812,9 @@ gfc_simplify_trigd (gfc_expr *icall)
  gfc_expr *
  gfc_simplify_atrigd (gfc_expr *icall)
  {
@@ -223,7 +116,7 @@
    /* Let gfc_resolve_atrigd take care of the non-constant case.  */
    return NULL;
  }
-@@ -1840,21 +1778,9 @@ gfc_simplify_atrigd (gfc_expr *icall)
+@@ -1886,21 +1824,9 @@ gfc_simplify_atrigd (gfc_expr *icall)
  gfc_expr *
  gfc_simplify_atan2d (gfc_expr *y, gfc_expr *x)
  {
@@ -245,3 +138,103 @@
    /* Let gfc_resolve_atan2d take care of the non-constant case.  */
    return NULL;
  }
+@@ -5878,9 +5804,7 @@ gfc_simplify_mod (gfc_expr *a, gfc_expr
+     mpz_tdiv_r (result->value.integer, a->value.integer, p->value.integer);
+   else
+     {
+-      gfc_set_model_kind (kind);
+-      mpfr_fmod (result->value.real, a->value.real, p->value.real,
+-               GFC_RND_MODE);
++      return NULL;
+     }
+ 
+   return range_check (result, "MOD");
+@@ -5930,18 +5854,7 @@ gfc_simplify_modulo (gfc_expr *a, gfc_ex
+       mpz_fdiv_r (result->value.integer, a->value.integer, p->value.integer);
+   else
+     {
+-      gfc_set_model_kind (kind);
+-      mpfr_fmod (result->value.real, a->value.real, p->value.real,
+-                 GFC_RND_MODE);
+-      if (mpfr_cmp_ui (result->value.real, 0) != 0)
+-        {
+-          if (mpfr_signbit (a->value.real) != mpfr_signbit (p->value.real))
+-            mpfr_add (result->value.real, result->value.real, p->value.real,
+-                      GFC_RND_MODE);
+-          }
+-        else
+-        mpfr_copysign (result->value.real, result->value.real,
+-                       p->value.real, GFC_RND_MODE);
++      return NULL;
+     }
+ 
+   return range_check (result, "MODULO");
+Index: gcc/ubsan.c
+===================================================================
+--- gcc/ubsan.c.orig   2019-01-31 14:22:44.000000000 +0100
++++ gcc/ubsan.c        2019-10-07 18:34:36.000000000 +0200
+@@ -1847,40 +1847,6 @@ ubsan_instrument_float_cast (location_t
+         min = build_real (expr_type, minval2);
+       }
+     }
+-  else if (REAL_MODE_FORMAT (mode)->b == 10)
+-    {
+-      /* For _Decimal128 up to 34 decimal digits, - sign,
+-       dot, e, exponent.  */
+-      char buf[64];
+-      mpfr_t m;
+-      int p = REAL_MODE_FORMAT (mode)->p;
+-      REAL_VALUE_TYPE maxval, minval;
+-
+-      /* Use mpfr_snprintf rounding to compute the smallest
+-       representable decimal number greater or equal than
+-       1 << (prec - !uns_p).  */
+-      mpfr_init2 (m, prec + 2);
+-      mpfr_set_ui_2exp (m, 1, prec - !uns_p, GMP_RNDN);
+-      mpfr_snprintf (buf, sizeof buf, "%.*RUe", p - 1, m);
+-      decimal_real_from_string (&maxval, buf);
+-      max = build_real (expr_type, maxval);
+-
+-      /* For unsigned, assume -1.0 is always representable.  */
+-      if (uns_p)
+-      min = build_minus_one_cst (expr_type);
+-      else
+-      {
+-        /* Use mpfr_snprintf rounding to compute the largest
+-           representable decimal number less or equal than
+-           (-1 << (prec - 1)) - 1.  */
+-        mpfr_set_si_2exp (m, -1, prec - 1, GMP_RNDN);
+-        mpfr_sub_ui (m, m, 1, GMP_RNDN);
+-        mpfr_snprintf (buf, sizeof buf, "%.*RDe", p - 1, m);
+-        decimal_real_from_string (&minval, buf);
+-        min = build_real (expr_type, minval);
+-      }
+-      mpfr_clear (m);
+-    }
+   else
+     return NULL_TREE;
+ 
+Index: gcc/gimple-ssa-sprintf.c
+===================================================================
+--- gcc/gimple-ssa-sprintf.c.orig      2019-10-07 18:32:31.000000000 +0200
++++ gcc/gimple-ssa-sprintf.c   2019-10-07 18:34:36.000000000 +0200
+@@ -1580,18 +1580,7 @@ get_mpfr_format_length (mpfr_ptr x, cons
+       p = 1024;
+     }
+ 
+-  len = mpfr_snprintf (NULL, 0, fmtstr, (int)p, x);
+-
+-  /* Handle the unlikely (impossible?) error by returning more than
+-     the maximum dictated by the function's return type.  */
+-  if (len < 0)
+-    return target_dir_max () + 1;
+-
+-  /* Adjust the return value by the difference.  */
+-  if (p < prec)
+-    len += prec - p;
+-
+-  return len;
++  return target_dir_max () + 1;
+ }
+ 
+ /* Return the number of bytes to format using the format specifier


Reply via email to