https://gcc.gnu.org/g:5751cb5c7742708f66837862e1f6d33f23fe19bb

commit 5751cb5c7742708f66837862e1f6d33f23fe19bb
Author: Mikael Morin <[email protected]>
Date:   Fri Oct 16 12:44:43 2026 +0200

    Correction pr109345

Diff:
---
 gcc/fortran/trans-expr.cc | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index 143422d67cd5..77fbe21a04f5 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -1169,6 +1169,8 @@ gfc_conv_intrinsic_to_class (gfc_se *parmse, gfc_expr *e,
       else
        {
          parmse->ss = ss;
+         parmse->direct_byref = 1;
+         parmse->byref_noassign = 1;
          gfc_conv_expr_descriptor (parmse, e);
 
          /* Array references with vector subscripts and non-variable 
expressions

Reply via email to