[Bug libfortran/33298] Wrong code for SPREAD on zero-sized arrays
tkoenig at gcc dot gnu dot org
gcc-bugzilla@gcc.gnu.org
Thu Sep 6 19:26:00 GMT 2007
------- Comment #10 from tkoenig at gcc dot gnu dot org 2007-09-06 19:25 -------
Subject: Bug 33298
Author: tkoenig
Date: Thu Sep 6 19:25:30 2007
New Revision: 128206
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128206
Log:
2007-09-06 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/33298
* intrinsics/spread_generic.c(spread_internal): Enable
bounds checking by comparing extents if the bounds_check
option has been set. If any extent is <=0, return early.
2007-09-06 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/33298
* spread_zerosize_1.f90: New test case.
* spread_bounds_1.f90: New test case.
Added:
trunk/gcc/testsuite/gfortran.dg/spread_bounds_1.f90
trunk/gcc/testsuite/gfortran.dg/spread_zerosize_1.f90
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/libgfortran/ChangeLog
trunk/libgfortran/intrinsics/spread_generic.c
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33298
More information about the Gcc-bugs
mailing list