diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-09-03 06:45:35 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-09-03 06:45:35 +0000 |
commit | 9badbcf86985820ab70df27e4b15767c0ee2c940 (patch) | |
tree | 54ac0d5a0e4d9a0858faeb646d373df0c58b4fdc /gcc | |
parent | 8a96d64282ac534cb597f446f02ac5d0b13249cc (diff) | |
download | ppe42-gcc-9badbcf86985820ab70df27e4b15767c0ee2c940.tar.gz ppe42-gcc-9badbcf86985820ab70df27e4b15767c0ee2c940.zip |
2012-09-03 Tobias Burnus <burnus@net-b.de>
* class.c (finalize_component): Fixes to the comment.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@190870 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/class.c | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 6032a1a6a3e..201f4dc3228 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2012-09-03 Tobias Burnus <burnus@net-b.de> + + * class.c (finalize_component): Fixes to the comment. + 2012-09-03 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com> Tobias Burnus <burnus@net-b.de> diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index 38a4ddb5302..71065d25841 100644 --- a/gcc/fortran/class.c +++ b/gcc/fortran/class.c @@ -720,8 +720,8 @@ has_finalizer_component (gfc_symbol *derived) /* Call DEALLOCATE for the passed component if it is allocatable, if it is neither allocatable nor a pointer but has a finalizer, call it. If it - is a nonpointer component with allocatable or finalizes components, walk - them. Either of the is required; other nonallocatables and pointers aren't + is a nonpointer component with allocatable components or has finalizers, walk + them. Either of them is required; other nonallocatables and pointers aren't handled gracefully. Note: If the component is allocatable, the DEALLOCATE handling takes care of calling the appropriate finalizers, coarray deregistering, and |