OSDN Git Service

2007-09-06 Thomas Koenig <tkoenig@gcc.gnu.org>
authortkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 6 Sep 2007 19:25:30 +0000 (19:25 +0000)
committertkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 6 Sep 2007 19:25:30 +0000 (19:25 +0000)
commitbd8ddb12888a7f836944ff8b88080b2ddb520054
tree7548143d4fd494513065439cea1d484e2a9228a5
parentaab257919732f9666e2368b2481559146fec3a76
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@128206 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/spread_bounds_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/spread_zerosize_1.f90 [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/intrinsics/spread_generic.c