[v2,0/3] libgfortran: empty array fixes

Message ID	20231107102404.1723120-1-mikael@gcc.gnu.org
Headers	Received-SPF: pass (google.com: domain of gcc-patches-bounces+ouuuleilei=gmail.com@gcc.gnu.org designates 8.43.85.97 as permitted sender) client-ip=8.43.85.97; DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org C0E89385C6DF From: Mikael Morin <mikael@gcc.gnu.org> To: fortran@gcc.gnu.org, gcc-patches@gcc.gnu.org Subject: [PATCH v2 0/3] libgfortran: empty array fixes Date: Tue, 7 Nov 2023 11:24:01 +0100 Message-ID: <20231107102404.1723120-1-mikael@gcc.gnu.org> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Precedence: list Errors-To: gcc-patches-bounces+ouuuleilei=gmail.com@gcc.gnu.org X-getmail-retrieved-from-mailbox: INBOX
Series	libgfortran: empty array fixes \| [v2,0/3] libgfortran: empty array fixes [v2,1/3] libgfortran: Don't skip allocation if size is zero [PR112412] [v2,2/3] libgfortran: Remove early return if extent is zero [PR112371] [v2,3/3] libgfortran: Remove empty array descriptor first dimension overwrite [PR112371]

Message ID

20231107102404.1723120-1-mikael@gcc.gnu.org

Headers

Received-SPF: pass (google.com: domain of
 gcc-patches-bounces+ouuuleilei=gmail.com@gcc.gnu.org designates 8.43.85.97 as
 permitted sender) client-ip=8.43.85.97;
DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org C0E89385C6DF
From: Mikael Morin <mikael@gcc.gnu.org>
To: fortran@gcc.gnu.org,
	gcc-patches@gcc.gnu.org
Subject: [PATCH v2 0/3] libgfortran: empty array fixes
Date: Tue,  7 Nov 2023 11:24:01 +0100
Message-ID: <20231107102404.1723120-1-mikael@gcc.gnu.org>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Precedence: list
Errors-To: gcc-patches-bounces+ouuuleilei=gmail.com@gcc.gnu.org

Series

libgfortran: empty array fixes |

Message

Mikael Morin Nov. 7, 2023, 10:24 a.m. UTC

  Hello,

Harald's review of the previous version [1] of these patches spotted a possible
misbehaving case in one patch, and a latent bug in the area of the second
patch.
So here is the second try, bootstraped and regression tested on x86_64-pc-linux-gnu.
OK for master?

Mikael

[1]:
https://gcc.gnu.org/pipermail/fortran/2023-November/059896.html
https://gcc.gnu.org/pipermail/gcc-patches/2023-November/635305.html

Changes from version 1:
 * Add patch 1/3 to the series fixing the unallocated empty result issue.
 * In patch 2/3 (formerly 1/2) clamp negative extent to zero.


Mikael Morin (3):
  libgfortran: Don't skip allocation if size is zero [PR112412]
  libgfortran: Remove early return if extent is zero [PR112371]
  libgfortran: Remove empty array descriptor first dimension overwrite
    [PR112371]

 gcc/testsuite/gfortran.dg/allocated_4.f90 | 195 +++++++
 gcc/testsuite/gfortran.dg/bound_10.f90    | 207 ++++++++
 gcc/testsuite/gfortran.dg/bound_11.f90    | 588 ++++++++++++++++++++++
 libgfortran/generated/all_l1.c            |   9 +-
 libgfortran/generated/all_l16.c           |   9 +-
 libgfortran/generated/all_l2.c            |   9 +-
 libgfortran/generated/all_l4.c            |   9 +-
 libgfortran/generated/all_l8.c            |   9 +-
 libgfortran/generated/any_l1.c            |   9 +-
 libgfortran/generated/any_l16.c           |   9 +-
 libgfortran/generated/any_l2.c            |   9 +-
 libgfortran/generated/any_l4.c            |   9 +-
 libgfortran/generated/any_l8.c            |   9 +-
 libgfortran/generated/count_16_l.c        |   9 +-
 libgfortran/generated/count_1_l.c         |   9 +-
 libgfortran/generated/count_2_l.c         |   9 +-
 libgfortran/generated/count_4_l.c         |   9 +-
 libgfortran/generated/count_8_l.c         |   9 +-
 libgfortran/generated/findloc1_c10.c      |  18 +-
 libgfortran/generated/findloc1_c16.c      |  18 +-
 libgfortran/generated/findloc1_c17.c      |  18 +-
 libgfortran/generated/findloc1_c4.c       |  18 +-
 libgfortran/generated/findloc1_c8.c       |  18 +-
 libgfortran/generated/findloc1_i1.c       |  18 +-
 libgfortran/generated/findloc1_i16.c      |  18 +-
 libgfortran/generated/findloc1_i2.c       |  18 +-
 libgfortran/generated/findloc1_i4.c       |  18 +-
 libgfortran/generated/findloc1_i8.c       |  18 +-
 libgfortran/generated/findloc1_r10.c      |  18 +-
 libgfortran/generated/findloc1_r16.c      |  18 +-
 libgfortran/generated/findloc1_r17.c      |  18 +-
 libgfortran/generated/findloc1_r4.c       |  18 +-
 libgfortran/generated/findloc1_r8.c       |  18 +-
 libgfortran/generated/findloc1_s1.c       |  18 +-
 libgfortran/generated/findloc1_s4.c       |  18 +-
 libgfortran/generated/iall_i1.c           |  30 +-
 libgfortran/generated/iall_i16.c          |  30 +-
 libgfortran/generated/iall_i2.c           |  30 +-
 libgfortran/generated/iall_i4.c           |  30 +-
 libgfortran/generated/iall_i8.c           |  30 +-
 libgfortran/generated/iany_i1.c           |  30 +-
 libgfortran/generated/iany_i16.c          |  30 +-
 libgfortran/generated/iany_i2.c           |  30 +-
 libgfortran/generated/iany_i4.c           |  30 +-
 libgfortran/generated/iany_i8.c           |  30 +-
 libgfortran/generated/iparity_i1.c        |  30 +-
 libgfortran/generated/iparity_i16.c       |  30 +-
 libgfortran/generated/iparity_i2.c        |  30 +-
 libgfortran/generated/iparity_i4.c        |  30 +-
 libgfortran/generated/iparity_i8.c        |  30 +-
 libgfortran/generated/maxloc1_16_i1.c     |  30 +-
 libgfortran/generated/maxloc1_16_i16.c    |  30 +-
 libgfortran/generated/maxloc1_16_i2.c     |  30 +-
 libgfortran/generated/maxloc1_16_i4.c     |  30 +-
 libgfortran/generated/maxloc1_16_i8.c     |  30 +-
 libgfortran/generated/maxloc1_16_r10.c    |  30 +-
 libgfortran/generated/maxloc1_16_r16.c    |  30 +-
 libgfortran/generated/maxloc1_16_r17.c    |  30 +-
 libgfortran/generated/maxloc1_16_r4.c     |  30 +-
 libgfortran/generated/maxloc1_16_r8.c     |  30 +-
 libgfortran/generated/maxloc1_16_s1.c     |  30 +-
 libgfortran/generated/maxloc1_16_s4.c     |  30 +-
 libgfortran/generated/maxloc1_4_i1.c      |  30 +-
 libgfortran/generated/maxloc1_4_i16.c     |  30 +-
 libgfortran/generated/maxloc1_4_i2.c      |  30 +-
 libgfortran/generated/maxloc1_4_i4.c      |  30 +-
 libgfortran/generated/maxloc1_4_i8.c      |  30 +-
 libgfortran/generated/maxloc1_4_r10.c     |  30 +-
 libgfortran/generated/maxloc1_4_r16.c     |  30 +-
 libgfortran/generated/maxloc1_4_r17.c     |  30 +-
 libgfortran/generated/maxloc1_4_r4.c      |  30 +-
 libgfortran/generated/maxloc1_4_r8.c      |  30 +-
 libgfortran/generated/maxloc1_4_s1.c      |  30 +-
 libgfortran/generated/maxloc1_4_s4.c      |  30 +-
 libgfortran/generated/maxloc1_8_i1.c      |  30 +-
 libgfortran/generated/maxloc1_8_i16.c     |  30 +-
 libgfortran/generated/maxloc1_8_i2.c      |  30 +-
 libgfortran/generated/maxloc1_8_i4.c      |  30 +-
 libgfortran/generated/maxloc1_8_i8.c      |  30 +-
 libgfortran/generated/maxloc1_8_r10.c     |  30 +-
 libgfortran/generated/maxloc1_8_r16.c     |  30 +-
 libgfortran/generated/maxloc1_8_r17.c     |  30 +-
 libgfortran/generated/maxloc1_8_r4.c      |  30 +-
 libgfortran/generated/maxloc1_8_r8.c      |  30 +-
 libgfortran/generated/maxloc1_8_s1.c      |  30 +-
 libgfortran/generated/maxloc1_8_s4.c      |  30 +-
 libgfortran/generated/maxval1_s1.c        |  30 +-
 libgfortran/generated/maxval1_s4.c        |  30 +-
 libgfortran/generated/maxval_i1.c         |  30 +-
 libgfortran/generated/maxval_i16.c        |  30 +-
 libgfortran/generated/maxval_i2.c         |  30 +-
 libgfortran/generated/maxval_i4.c         |  30 +-
 libgfortran/generated/maxval_i8.c         |  30 +-
 libgfortran/generated/maxval_r10.c        |  30 +-
 libgfortran/generated/maxval_r16.c        |  30 +-
 libgfortran/generated/maxval_r17.c        |  30 +-
 libgfortran/generated/maxval_r4.c         |  30 +-
 libgfortran/generated/maxval_r8.c         |  30 +-
 libgfortran/generated/minloc1_16_i1.c     |  30 +-
 libgfortran/generated/minloc1_16_i16.c    |  30 +-
 libgfortran/generated/minloc1_16_i2.c     |  30 +-
 libgfortran/generated/minloc1_16_i4.c     |  30 +-
 libgfortran/generated/minloc1_16_i8.c     |  30 +-
 libgfortran/generated/minloc1_16_r10.c    |  30 +-
 libgfortran/generated/minloc1_16_r16.c    |  30 +-
 libgfortran/generated/minloc1_16_r17.c    |  30 +-
 libgfortran/generated/minloc1_16_r4.c     |  30 +-
 libgfortran/generated/minloc1_16_r8.c     |  30 +-
 libgfortran/generated/minloc1_16_s1.c     |  30 +-
 libgfortran/generated/minloc1_16_s4.c     |  30 +-
 libgfortran/generated/minloc1_4_i1.c      |  30 +-
 libgfortran/generated/minloc1_4_i16.c     |  30 +-
 libgfortran/generated/minloc1_4_i2.c      |  30 +-
 libgfortran/generated/minloc1_4_i4.c      |  30 +-
 libgfortran/generated/minloc1_4_i8.c      |  30 +-
 libgfortran/generated/minloc1_4_r10.c     |  30 +-
 libgfortran/generated/minloc1_4_r16.c     |  30 +-
 libgfortran/generated/minloc1_4_r17.c     |  30 +-
 libgfortran/generated/minloc1_4_r4.c      |  30 +-
 libgfortran/generated/minloc1_4_r8.c      |  30 +-
 libgfortran/generated/minloc1_4_s1.c      |  30 +-
 libgfortran/generated/minloc1_4_s4.c      |  30 +-
 libgfortran/generated/minloc1_8_i1.c      |  30 +-
 libgfortran/generated/minloc1_8_i16.c     |  30 +-
 libgfortran/generated/minloc1_8_i2.c      |  30 +-
 libgfortran/generated/minloc1_8_i4.c      |  30 +-
 libgfortran/generated/minloc1_8_i8.c      |  30 +-
 libgfortran/generated/minloc1_8_r10.c     |  30 +-
 libgfortran/generated/minloc1_8_r16.c     |  30 +-
 libgfortran/generated/minloc1_8_r17.c     |  30 +-
 libgfortran/generated/minloc1_8_r4.c      |  30 +-
 libgfortran/generated/minloc1_8_r8.c      |  30 +-
 libgfortran/generated/minloc1_8_s1.c      |  30 +-
 libgfortran/generated/minloc1_8_s4.c      |  30 +-
 libgfortran/generated/minval1_s1.c        |  30 +-
 libgfortran/generated/minval1_s4.c        |  30 +-
 libgfortran/generated/minval_i1.c         |  30 +-
 libgfortran/generated/minval_i16.c        |  30 +-
 libgfortran/generated/minval_i2.c         |  30 +-
 libgfortran/generated/minval_i4.c         |  30 +-
 libgfortran/generated/minval_i8.c         |  30 +-
 libgfortran/generated/minval_r10.c        |  30 +-
 libgfortran/generated/minval_r16.c        |  30 +-
 libgfortran/generated/minval_r17.c        |  30 +-
 libgfortran/generated/minval_r4.c         |  30 +-
 libgfortran/generated/minval_r8.c         |  30 +-
 libgfortran/generated/norm2_r10.c         |   7 +-
 libgfortran/generated/norm2_r16.c         |   7 +-
 libgfortran/generated/norm2_r17.c         |   7 +-
 libgfortran/generated/norm2_r4.c          |   7 +-
 libgfortran/generated/norm2_r8.c          |   7 +-
 libgfortran/generated/parity_l1.c         |   7 +-
 libgfortran/generated/parity_l16.c        |   7 +-
 libgfortran/generated/parity_l2.c         |   7 +-
 libgfortran/generated/parity_l4.c         |   7 +-
 libgfortran/generated/parity_l8.c         |   7 +-
 libgfortran/generated/product_c10.c       |  30 +-
 libgfortran/generated/product_c16.c       |  30 +-
 libgfortran/generated/product_c17.c       |  30 +-
 libgfortran/generated/product_c4.c        |  30 +-
 libgfortran/generated/product_c8.c        |  30 +-
 libgfortran/generated/product_i1.c        |  30 +-
 libgfortran/generated/product_i16.c       |  30 +-
 libgfortran/generated/product_i2.c        |  30 +-
 libgfortran/generated/product_i4.c        |  30 +-
 libgfortran/generated/product_i8.c        |  30 +-
 libgfortran/generated/product_r10.c       |  30 +-
 libgfortran/generated/product_r16.c       |  30 +-
 libgfortran/generated/product_r17.c       |  30 +-
 libgfortran/generated/product_r4.c        |  30 +-
 libgfortran/generated/product_r8.c        |  30 +-
 libgfortran/generated/sum_c10.c           |  30 +-
 libgfortran/generated/sum_c16.c           |  30 +-
 libgfortran/generated/sum_c17.c           |  30 +-
 libgfortran/generated/sum_c4.c            |  30 +-
 libgfortran/generated/sum_c8.c            |  30 +-
 libgfortran/generated/sum_i1.c            |  30 +-
 libgfortran/generated/sum_i16.c           |  30 +-
 libgfortran/generated/sum_i2.c            |  30 +-
 libgfortran/generated/sum_i4.c            |  30 +-
 libgfortran/generated/sum_i8.c            |  30 +-
 libgfortran/generated/sum_r10.c           |  30 +-
 libgfortran/generated/sum_r16.c           |  30 +-
 libgfortran/generated/sum_r17.c           |  30 +-
 libgfortran/generated/sum_r4.c            |  30 +-
 libgfortran/generated/sum_r8.c            |  30 +-
 libgfortran/m4/ifindloc1.m4               |  18 +-
 libgfortran/m4/ifunction-s.m4             |  30 +-
 libgfortran/m4/ifunction-s2.m4            |  30 +-
 libgfortran/m4/ifunction.m4               |  30 +-
 libgfortran/m4/ifunction_logical.m4       |   9 +-
 191 files changed, 2094 insertions(+), 3754 deletions(-)
 create mode 100644 gcc/testsuite/gfortran.dg/allocated_4.f90
 create mode 100644 gcc/testsuite/gfortran.dg/bound_10.f90
 create mode 100644 gcc/testsuite/gfortran.dg/bound_11.f90

Comments

Harald Anlauf Nov. 7, 2023, 6:16 p.m. UTC | #1

Hi Mikael,

this is OK.

Thanks for the patches!

Harald

On 11/7/23 11:24, Mikael Morin wrote:
> Hello,
>
> Harald's review of the previous version [1] of these patches spotted a possible
> misbehaving case in one patch, and a latent bug in the area of the second
> patch.
> So here is the second try, bootstraped and regression tested on x86_64-pc-linux-gnu.
> OK for master?
>
> Mikael
>
> [1]:
> https://gcc.gnu.org/pipermail/fortran/2023-November/059896.html
> https://gcc.gnu.org/pipermail/gcc-patches/2023-November/635305.html
>
> Changes from version 1:
>   * Add patch 1/3 to the series fixing the unallocated empty result issue.
>   * In patch 2/3 (formerly 1/2) clamp negative extent to zero.
>
>
> Mikael Morin (3):
>    libgfortran: Don't skip allocation if size is zero [PR112412]
>    libgfortran: Remove early return if extent is zero [PR112371]
>    libgfortran: Remove empty array descriptor first dimension overwrite
>      [PR112371]
>
>   gcc/testsuite/gfortran.dg/allocated_4.f90 | 195 +++++++
>   gcc/testsuite/gfortran.dg/bound_10.f90    | 207 ++++++++
>   gcc/testsuite/gfortran.dg/bound_11.f90    | 588 ++++++++++++++++++++++
>   libgfortran/generated/all_l1.c            |   9 +-
>   libgfortran/generated/all_l16.c           |   9 +-
>   libgfortran/generated/all_l2.c            |   9 +-
>   libgfortran/generated/all_l4.c            |   9 +-
>   libgfortran/generated/all_l8.c            |   9 +-
>   libgfortran/generated/any_l1.c            |   9 +-
>   libgfortran/generated/any_l16.c           |   9 +-
>   libgfortran/generated/any_l2.c            |   9 +-
>   libgfortran/generated/any_l4.c            |   9 +-
>   libgfortran/generated/any_l8.c            |   9 +-
>   libgfortran/generated/count_16_l.c        |   9 +-
>   libgfortran/generated/count_1_l.c         |   9 +-
>   libgfortran/generated/count_2_l.c         |   9 +-
>   libgfortran/generated/count_4_l.c         |   9 +-
>   libgfortran/generated/count_8_l.c         |   9 +-
>   libgfortran/generated/findloc1_c10.c      |  18 +-
>   libgfortran/generated/findloc1_c16.c      |  18 +-
>   libgfortran/generated/findloc1_c17.c      |  18 +-
>   libgfortran/generated/findloc1_c4.c       |  18 +-
>   libgfortran/generated/findloc1_c8.c       |  18 +-
>   libgfortran/generated/findloc1_i1.c       |  18 +-
>   libgfortran/generated/findloc1_i16.c      |  18 +-
>   libgfortran/generated/findloc1_i2.c       |  18 +-
>   libgfortran/generated/findloc1_i4.c       |  18 +-
>   libgfortran/generated/findloc1_i8.c       |  18 +-
>   libgfortran/generated/findloc1_r10.c      |  18 +-
>   libgfortran/generated/findloc1_r16.c      |  18 +-
>   libgfortran/generated/findloc1_r17.c      |  18 +-
>   libgfortran/generated/findloc1_r4.c       |  18 +-
>   libgfortran/generated/findloc1_r8.c       |  18 +-
>   libgfortran/generated/findloc1_s1.c       |  18 +-
>   libgfortran/generated/findloc1_s4.c       |  18 +-
>   libgfortran/generated/iall_i1.c           |  30 +-
>   libgfortran/generated/iall_i16.c          |  30 +-
>   libgfortran/generated/iall_i2.c           |  30 +-
>   libgfortran/generated/iall_i4.c           |  30 +-
>   libgfortran/generated/iall_i8.c           |  30 +-
>   libgfortran/generated/iany_i1.c           |  30 +-
>   libgfortran/generated/iany_i16.c          |  30 +-
>   libgfortran/generated/iany_i2.c           |  30 +-
>   libgfortran/generated/iany_i4.c           |  30 +-
>   libgfortran/generated/iany_i8.c           |  30 +-
>   libgfortran/generated/iparity_i1.c        |  30 +-
>   libgfortran/generated/iparity_i16.c       |  30 +-
>   libgfortran/generated/iparity_i2.c        |  30 +-
>   libgfortran/generated/iparity_i4.c        |  30 +-
>   libgfortran/generated/iparity_i8.c        |  30 +-
>   libgfortran/generated/maxloc1_16_i1.c     |  30 +-
>   libgfortran/generated/maxloc1_16_i16.c    |  30 +-
>   libgfortran/generated/maxloc1_16_i2.c     |  30 +-
>   libgfortran/generated/maxloc1_16_i4.c     |  30 +-
>   libgfortran/generated/maxloc1_16_i8.c     |  30 +-
>   libgfortran/generated/maxloc1_16_r10.c    |  30 +-
>   libgfortran/generated/maxloc1_16_r16.c    |  30 +-
>   libgfortran/generated/maxloc1_16_r17.c    |  30 +-
>   libgfortran/generated/maxloc1_16_r4.c     |  30 +-
>   libgfortran/generated/maxloc1_16_r8.c     |  30 +-
>   libgfortran/generated/maxloc1_16_s1.c     |  30 +-
>   libgfortran/generated/maxloc1_16_s4.c     |  30 +-
>   libgfortran/generated/maxloc1_4_i1.c      |  30 +-
>   libgfortran/generated/maxloc1_4_i16.c     |  30 +-
>   libgfortran/generated/maxloc1_4_i2.c      |  30 +-
>   libgfortran/generated/maxloc1_4_i4.c      |  30 +-
>   libgfortran/generated/maxloc1_4_i8.c      |  30 +-
>   libgfortran/generated/maxloc1_4_r10.c     |  30 +-
>   libgfortran/generated/maxloc1_4_r16.c     |  30 +-
>   libgfortran/generated/maxloc1_4_r17.c     |  30 +-
>   libgfortran/generated/maxloc1_4_r4.c      |  30 +-
>   libgfortran/generated/maxloc1_4_r8.c      |  30 +-
>   libgfortran/generated/maxloc1_4_s1.c      |  30 +-
>   libgfortran/generated/maxloc1_4_s4.c      |  30 +-
>   libgfortran/generated/maxloc1_8_i1.c      |  30 +-
>   libgfortran/generated/maxloc1_8_i16.c     |  30 +-
>   libgfortran/generated/maxloc1_8_i2.c      |  30 +-
>   libgfortran/generated/maxloc1_8_i4.c      |  30 +-
>   libgfortran/generated/maxloc1_8_i8.c      |  30 +-
>   libgfortran/generated/maxloc1_8_r10.c     |  30 +-
>   libgfortran/generated/maxloc1_8_r16.c     |  30 +-
>   libgfortran/generated/maxloc1_8_r17.c     |  30 +-
>   libgfortran/generated/maxloc1_8_r4.c      |  30 +-
>   libgfortran/generated/maxloc1_8_r8.c      |  30 +-
>   libgfortran/generated/maxloc1_8_s1.c      |  30 +-
>   libgfortran/generated/maxloc1_8_s4.c      |  30 +-
>   libgfortran/generated/maxval1_s1.c        |  30 +-
>   libgfortran/generated/maxval1_s4.c        |  30 +-
>   libgfortran/generated/maxval_i1.c         |  30 +-
>   libgfortran/generated/maxval_i16.c        |  30 +-
>   libgfortran/generated/maxval_i2.c         |  30 +-
>   libgfortran/generated/maxval_i4.c         |  30 +-
>   libgfortran/generated/maxval_i8.c         |  30 +-
>   libgfortran/generated/maxval_r10.c        |  30 +-
>   libgfortran/generated/maxval_r16.c        |  30 +-
>   libgfortran/generated/maxval_r17.c        |  30 +-
>   libgfortran/generated/maxval_r4.c         |  30 +-
>   libgfortran/generated/maxval_r8.c         |  30 +-
>   libgfortran/generated/minloc1_16_i1.c     |  30 +-
>   libgfortran/generated/minloc1_16_i16.c    |  30 +-
>   libgfortran/generated/minloc1_16_i2.c     |  30 +-
>   libgfortran/generated/minloc1_16_i4.c     |  30 +-
>   libgfortran/generated/minloc1_16_i8.c     |  30 +-
>   libgfortran/generated/minloc1_16_r10.c    |  30 +-
>   libgfortran/generated/minloc1_16_r16.c    |  30 +-
>   libgfortran/generated/minloc1_16_r17.c    |  30 +-
>   libgfortran/generated/minloc1_16_r4.c     |  30 +-
>   libgfortran/generated/minloc1_16_r8.c     |  30 +-
>   libgfortran/generated/minloc1_16_s1.c     |  30 +-
>   libgfortran/generated/minloc1_16_s4.c     |  30 +-
>   libgfortran/generated/minloc1_4_i1.c      |  30 +-
>   libgfortran/generated/minloc1_4_i16.c     |  30 +-
>   libgfortran/generated/minloc1_4_i2.c      |  30 +-
>   libgfortran/generated/minloc1_4_i4.c      |  30 +-
>   libgfortran/generated/minloc1_4_i8.c      |  30 +-
>   libgfortran/generated/minloc1_4_r10.c     |  30 +-
>   libgfortran/generated/minloc1_4_r16.c     |  30 +-
>   libgfortran/generated/minloc1_4_r17.c     |  30 +-
>   libgfortran/generated/minloc1_4_r4.c      |  30 +-
>   libgfortran/generated/minloc1_4_r8.c      |  30 +-
>   libgfortran/generated/minloc1_4_s1.c      |  30 +-
>   libgfortran/generated/minloc1_4_s4.c      |  30 +-
>   libgfortran/generated/minloc1_8_i1.c      |  30 +-
>   libgfortran/generated/minloc1_8_i16.c     |  30 +-
>   libgfortran/generated/minloc1_8_i2.c      |  30 +-
>   libgfortran/generated/minloc1_8_i4.c      |  30 +-
>   libgfortran/generated/minloc1_8_i8.c      |  30 +-
>   libgfortran/generated/minloc1_8_r10.c     |  30 +-
>   libgfortran/generated/minloc1_8_r16.c     |  30 +-
>   libgfortran/generated/minloc1_8_r17.c     |  30 +-
>   libgfortran/generated/minloc1_8_r4.c      |  30 +-
>   libgfortran/generated/minloc1_8_r8.c      |  30 +-
>   libgfortran/generated/minloc1_8_s1.c      |  30 +-
>   libgfortran/generated/minloc1_8_s4.c      |  30 +-
>   libgfortran/generated/minval1_s1.c        |  30 +-
>   libgfortran/generated/minval1_s4.c        |  30 +-
>   libgfortran/generated/minval_i1.c         |  30 +-
>   libgfortran/generated/minval_i16.c        |  30 +-
>   libgfortran/generated/minval_i2.c         |  30 +-
>   libgfortran/generated/minval_i4.c         |  30 +-
>   libgfortran/generated/minval_i8.c         |  30 +-
>   libgfortran/generated/minval_r10.c        |  30 +-
>   libgfortran/generated/minval_r16.c        |  30 +-
>   libgfortran/generated/minval_r17.c        |  30 +-
>   libgfortran/generated/minval_r4.c         |  30 +-
>   libgfortran/generated/minval_r8.c         |  30 +-
>   libgfortran/generated/norm2_r10.c         |   7 +-
>   libgfortran/generated/norm2_r16.c         |   7 +-
>   libgfortran/generated/norm2_r17.c         |   7 +-
>   libgfortran/generated/norm2_r4.c          |   7 +-
>   libgfortran/generated/norm2_r8.c          |   7 +-
>   libgfortran/generated/parity_l1.c         |   7 +-
>   libgfortran/generated/parity_l16.c        |   7 +-
>   libgfortran/generated/parity_l2.c         |   7 +-
>   libgfortran/generated/parity_l4.c         |   7 +-
>   libgfortran/generated/parity_l8.c         |   7 +-
>   libgfortran/generated/product_c10.c       |  30 +-
>   libgfortran/generated/product_c16.c       |  30 +-
>   libgfortran/generated/product_c17.c       |  30 +-
>   libgfortran/generated/product_c4.c        |  30 +-
>   libgfortran/generated/product_c8.c        |  30 +-
>   libgfortran/generated/product_i1.c        |  30 +-
>   libgfortran/generated/product_i16.c       |  30 +-
>   libgfortran/generated/product_i2.c        |  30 +-
>   libgfortran/generated/product_i4.c        |  30 +-
>   libgfortran/generated/product_i8.c        |  30 +-
>   libgfortran/generated/product_r10.c       |  30 +-
>   libgfortran/generated/product_r16.c       |  30 +-
>   libgfortran/generated/product_r17.c       |  30 +-
>   libgfortran/generated/product_r4.c        |  30 +-
>   libgfortran/generated/product_r8.c        |  30 +-
>   libgfortran/generated/sum_c10.c           |  30 +-
>   libgfortran/generated/sum_c16.c           |  30 +-
>   libgfortran/generated/sum_c17.c           |  30 +-
>   libgfortran/generated/sum_c4.c            |  30 +-
>   libgfortran/generated/sum_c8.c            |  30 +-
>   libgfortran/generated/sum_i1.c            |  30 +-
>   libgfortran/generated/sum_i16.c           |  30 +-
>   libgfortran/generated/sum_i2.c            |  30 +-
>   libgfortran/generated/sum_i4.c            |  30 +-
>   libgfortran/generated/sum_i8.c            |  30 +-
>   libgfortran/generated/sum_r10.c           |  30 +-
>   libgfortran/generated/sum_r16.c           |  30 +-
>   libgfortran/generated/sum_r17.c           |  30 +-
>   libgfortran/generated/sum_r4.c            |  30 +-
>   libgfortran/generated/sum_r8.c            |  30 +-
>   libgfortran/m4/ifindloc1.m4               |  18 +-
>   libgfortran/m4/ifunction-s.m4             |  30 +-
>   libgfortran/m4/ifunction-s2.m4            |  30 +-
>   libgfortran/m4/ifunction.m4               |  30 +-
>   libgfortran/m4/ifunction_logical.m4       |   9 +-
>   191 files changed, 2094 insertions(+), 3754 deletions(-)
>   create mode 100644 gcc/testsuite/gfortran.dg/allocated_4.f90
>   create mode 100644 gcc/testsuite/gfortran.dg/bound_10.f90
>   create mode 100644 gcc/testsuite/gfortran.dg/bound_11.f90
>

Mikael Morin Nov. 8, 2023, 1:06 p.m. UTC | #2

Le 07/11/2023 à 19:16, Harald Anlauf a écrit :
> Hi Mikael,
> 
> this is OK.
> 
> Thanks for the patches!
> 
> Harald
> 

Patches pushed.
Thanks for the (fruitful) review.