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
