[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:59b06585d3a8e64f7118b6ed631b2c50439c78fa

commit 59b06585d3a8e64f7118b6ed631b2c50439c78fa
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 32938a69cf65..3e0a54dcabab 100644
--- a/gcc/fortran/trans-types.cc
+++ b/gcc/fortran/trans-types.cc
@@ -1308,6 +1308,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);