allocate_zerosize_1.f90
645 Bytes
-
re PR fortran/26017 (allocate (a(1:-1)) should yield zero-sized array) · 3c86fb4e
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. From-SVN: r112988
Thomas Koenig committed