diff options
author | Mikael Morin <mikael@gcc.gnu.org> | 2022-09-01 11:27:36 +0200 |
---|---|---|
committer | Mikael Morin <mikael@gcc.gnu.org> | 2022-09-25 14:44:54 +0200 |
commit | 95375ffb3dd59f51e79408dd3b2b620dc1af71b1 (patch) | |
tree | 15a4d6e59420f2ba7b4fe123e155180d492808a5 /gcc/fortran | |
parent | d5e1935b09fa05093e31d7ce5e21b7e71957c103 (diff) | |
download | gcc-95375ffb3dd59f51e79408dd3b2b620dc1af71b1.zip gcc-95375ffb3dd59f51e79408dd3b2b620dc1af71b1.tar.gz gcc-95375ffb3dd59f51e79408dd3b2b620dc1af71b1.tar.bz2 |
fortran: Support clobbering of allocatables and pointers [PR41453]
This adds support for clobbering of allocatable and pointer scalar
variables passed as actual argument to a subroutine when the associated
dummy has the INTENT(OUT) attribute.
Support was explicitly disabled (since the beginning for pointers, since
r11-7315-g2df374b337a5f6cf5528e91718e4e12e4006b7ae for allocatables),
but the clobber generation code seems to support it well, as
demonstrated by the newly added testcase.
PR fortran/41453
PR fortran/99169
gcc/fortran/ChangeLog:
* trans-expr.cc (gfc_conv_procedure_call): Remove conditions
on ALLOCATABLE and POINTER attributes guarding clobber
generation.
gcc/testsuite/ChangeLog:
* gfortran.dg/intent_optimize_9.f90: New test.
Diffstat (limited to 'gcc/fortran')
-rw-r--r-- | gcc/fortran/trans-expr.cc | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc index c2c7382..52b96fa 100644 --- a/gcc/fortran/trans-expr.cc +++ b/gcc/fortran/trans-expr.cc @@ -6525,8 +6525,6 @@ gfc_conv_procedure_call (gfc_se * se, gfc_symbol * sym, && e->symtree && e->symtree->n.sym && !e->symtree->n.sym->attr.dimension - && !e->symtree->n.sym->attr.pointer - && !e->symtree->n.sym->attr.allocatable && e->ts.type != BT_CHARACTER && e->ts.type != BT_DERIVED && e->ts.type != BT_CLASS |