| commit | 3baa29e94f5db3160fdd13b21efd20fb0c4483d4 | |
| author | tkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sun, 16 Apr 2006 20:29:24 +0000 (16 20:29 +0000) | ||
| committer | tkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sun, 16 Apr 2006 20:29:24 +0000 (16 20:29 +0000) | ||
| tree | 50e4ad3d8a48e6299d17a219b0a2d98448670795 | treesnapshot (tar.gz zip) |
| parent | f368fabb50fbb659f131299c3601c13b2b0eb7e9 | commitdiff |
2006-04-16 Thomas Koenig <Thomas.Koenig@online.de>
PR fortran/26017
* trans-array.c(gfc_array_init_size): Introduce or_expr
which is true if the size along any dimension
is negative. Create a temporary variable with base
name size. If or_expr is true, set the temporary to 0,
to the normal size otherwise.
2006-04-16 Thomas Koenig <Thomas.Koenig@online.de>
* gfortran.dg/allocate_zerosize_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@112988 138bc75d-0d04-0410-961f-82ee72b054a4
PR fortran/26017
* trans-array.c(gfc_array_init_size): Introduce or_expr
which is true if the size along any dimension
is negative. Create a temporary variable with base
name size. If or_expr is true, set the temporary to 0,
to the normal size otherwise.
2006-04-16 Thomas Koenig <Thomas.Koenig@online.de>
* gfortran.dg/allocate_zerosize_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@112988 138bc75d-0d04-0410-961f-82ee72b054a4