2005-09-21 Erik Edelmann <erik.edelmann@iki.fi>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 21 Sep 2005 17:05:16 +0000 (17:05 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 21 Sep 2005 17:05:16 +0000 (17:05 +0000)
commitddc2803eb78fc71725679a6882663cd255eec672
tree85e83f75fd776d84771496e76fe2a6196d114d81
parent96d317795fe91553b960cdcf6baca8b430326ca2
2005-09-21  Erik Edelmann  <erik.edelmann@iki.fi>

PR fortran/19929
* trans-stmt.c (gfc_trans_deallocate): Check if the
object to be deallocated is an array by looking at
expr->rank instead of expr->symtree->n.sym->attr.dimension.

2005-09-21  Erik Edelmann  <erik.edelmann@iki.fi>

PR fortran/19929
* gfortran.dg/der_ptr_component_1.f90: New test.

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