public inbox for fortran@gcc.gnu.org
 help / color / mirror / Atom feed
From: Mikael Morin <mikael@gcc.gnu.org>
To: gcc-patches@gcc.gnu.org, fortran@gcc.gnu.org
Subject: [PATCH 0/2] libgfortran: empty array fixes [PR112371]
Date: Mon,  6 Nov 2023 12:43:23 +0100	[thread overview]
Message-ID: <20231106114325.828968-1-mikael@gcc.gnu.org> (raw)

Hello,

while preparing a testcase, I encountered a bug which I filed as
PR112371.  Investigating further, I found two different problems which I
propose to fix with the followup patches.

Those have been bootstraped and regression tested on x86_64-pc-linux-gnu.
OK for master?

Mikael


Mikael Morin (2):
  libgfortran: Remove early return if extent is zero [PR112371]
  libgfortran: Remove empty array descriptor first dimension overwrite
    [PR112371]

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

-- 
2.42.0


             reply	other threads:[~2023-11-06 11:43 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-11-06 11:43 Mikael Morin [this message]
2023-11-06 11:43 ` [PATCH 1/2] libgfortran: Remove early return if extent is zero [PR112371] Mikael Morin
2023-11-06 18:12   ` Harald Anlauf
2023-11-06 18:57     ` Mikael Morin
2023-11-06 11:43 ` [PATCH 2/2] libgfortran: Remove empty array descriptor first dimension overwrite [PR112371] Mikael Morin
2023-11-06 18:20   ` Harald Anlauf
2023-11-06 19:19     ` Mikael Morin
2023-11-06 20:03       ` Harald Anlauf

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20231106114325.828968-1-mikael@gcc.gnu.org \
    --to=mikael@gcc.gnu.org \
    --cc=fortran@gcc.gnu.org \
    --cc=gcc-patches@gcc.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).