OSDN Git Service

2008-10-30 Mikael Morin <mikael.morin@tele2.fr>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 30 Oct 2008 20:45:09 +0000 (20:45 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 30 Oct 2008 20:45:09 +0000 (20:45 +0000)
commit1af4a8466bbe5c5a06c41aa2114dad65f2ef75ae
tree9d0afc69002d14e4a8f26dc27e704b7126263fe6
parentbe6ed2e19d8da74f69fa8e25e99cc6c95f2324c7
2008-10-30  Mikael Morin  <mikael.morin@tele2.fr>

        PR fortran/37903
        * trans-array.c (gfc_trans_create_temp_array): If n is less
than the temporary dimension, assert that loop->from is
zero (reverts to earlier versions). If there is at least one
null loop->to[n], it is a callee allocated array so set the
size to NULL and break.
(gfc_trans_constant_array_constructor): Set the offset to zero.
(gfc_trans_array_constructor): Remove loop shifting around the
temporary creation.
(gfc_conv_loop_setup): Prefer zero-based descriptors if
possible.  Calculate the translation from loop variables to
array indices if an array constructor.

2008-10-30  Mikael Morin  <mikael.morin@tele2.fr>

        PR fortran/37749
        * trans-array.c (gfc_trans_create_temp_array): If size is NULL
use the array bounds for loop->to.

2008-10-30  Mikael Morin  <mikael.morin@tele2.fr>

        PR fortran/37903
        * gfortran.dg/vector_subscript_4.f90: New test.

2008-10-30  Mikael Morin  <mikael.morin@tele2.fr>

        PR fortran/37749
        * gfortran.dg/vector_subscript__5.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@141467 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-array.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/vector_subscript_4.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/vector_subscript_5.f90 [new file with mode: 0644]