diff options
| author | Harald Anlauf <anlauf@gmx.de> | 2022-11-27 21:10:18 +0100 |
|---|---|---|
| committer | Harald Anlauf <anlauf@gmx.de> | 2022-11-28 19:53:53 +0100 |
| commit | 07b9bcc1d1484f8f1c850ff14db678fb6b1e4d36 (patch) | |
| tree | afb04aeb885aa4c0468f7019941c13b1375a7015 /gcc/fortran | |
| parent | 2200b7054638bbf157192a4dca23886dd420becb (diff) | |
| download | gcc-07b9bcc1d1484f8f1c850ff14db678fb6b1e4d36.zip gcc-07b9bcc1d1484f8f1c850ff14db678fb6b1e4d36.tar.gz gcc-07b9bcc1d1484f8f1c850ff14db678fb6b1e4d36.tar.bz2 | |
Fortran: ICE with elemental and dummy argument with VALUE attribute [PR107819]
gcc/fortran/ChangeLog:
PR fortran/107819
* trans-stmt.cc (gfc_conv_elemental_dependencies): In checking for
elemental dependencies, treat dummy argument with VALUE attribute
as implicitly having intent(in).
gcc/testsuite/ChangeLog:
PR fortran/107819
* gfortran.dg/elemental_dependency_7.f90: New test.
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/trans-stmt.cc | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans-stmt.cc b/gcc/fortran/trans-stmt.cc index fd6d294..b288f1f 100644 --- a/gcc/fortran/trans-stmt.cc +++ b/gcc/fortran/trans-stmt.cc @@ -264,6 +264,7 @@ gfc_conv_elemental_dependencies (gfc_se * se, gfc_se * loopse, if (e->expr_type == EXPR_VARIABLE && e->rank && fsym && fsym->attr.intent != INTENT_IN + && !fsym->attr.value && gfc_check_fncall_dependency (e, fsym->attr.intent, sym, arg0, check_variable)) { |