[gcc(refs/users/mikael/heads/refactor_descriptor_v08)] Correction partielle coindexed_1.f90

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:f4d13778f338920d8d635ce20e963c80fc8d6f4b

commit f4d13778f338920d8d635ce20e963c80fc8d6f4b
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Thu Oct 9 22:21:11 2025 +0200

    Correction partielle coindexed_1.f90

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

diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index 20e4fdb34691..4520493b6f87 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -6608,6 +6608,9 @@ contiguous_argument (gfc_actual_arglist *arg)
       && expr->value.function.isym != nullptr)
     return false;
 
+  if (dummy == nullptr)
+    return true;
+
   if (dummy->intrinsicness == GFC_INTRINSIC_DUMMY_ARG)
     return false;