re PR fortran/30720 ([4.1 only] runtime: check for empty array slices before allocati...
authorFrancois-Xavier Coudert <coudert@clipper.ens.fr>
Fri, 9 Feb 2007 20:31:18 +0000 (21:31 +0100)
committerFrançois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Fri, 9 Feb 2007 20:31:18 +0000 (20:31 +0000)
commit999ffb1a4b306ac65f47444ba5e2e63fb897c6c1
tree8d0107920863d9845a91d346a3352bc386b12cc7
parentb964502b99b17301bd22fb9932a97c55ebf8b945
re PR fortran/30720 ([4.1 only] runtime: check for empty array slices before allocating a negative amount of memory)

PR fortran/30720

* trans-array.c (gfc_trans_create_temp_array): Remove use of the
function argument. Always generate code for negative extent.
Simplify said code.
* trans-array.h (gfc_trans_create_temp_array): Change prototype.
* trans-expr.c (gfc_conv_function_call): Remove use of last argument
of gfc_trans_create_temp_array.
* trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Likewise.
* trans-stmt.c (gfc_conv_elemental_dependencies): Likewise.

* gfortran.dg/array_function_1.f90: New test.

From-SVN: r121773
gcc/fortran/ChangeLog
gcc/fortran/trans-array.c
gcc/fortran/trans-array.h
gcc/fortran/trans-expr.c
gcc/fortran/trans-intrinsic.c
gcc/fortran/trans-stmt.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/array_function_1.f90 [new file with mode: 0644]