[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction longueur character absente (régression pr77942)

[Mikael Morin via Gcc-cvs]

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

commit eb70029d86761f7d69b9561a2e68fd35ae736129
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Fri Apr 18 15:40:06 2025 +0200

    Correction longueur character absente (régression pr77942)

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

diff --git a/gcc/fortran/trans-types.cc b/gcc/fortran/trans-types.cc
index 15d9f629feaf..4b48b46fc966 100644
--- a/gcc/fortran/trans-types.cc
+++ b/gcc/fortran/trans-types.cc
@@ -1305,6 +1305,8 @@ gfc_get_character_type (int kind, gfc_charlen * cl)
 {
   tree len;
 
+  gfc_conv_const_charlen (cl);
+
   len = (cl == NULL) ? NULL_TREE : cl->backend_decl;
   if (len && POINTER_TYPE_P (TREE_TYPE (len)))
     len = build_fold_indirect_ref (len);