https://gcc.gnu.org/g:0a74cbd7740a4d37ab5d0482bef14e9e0cbcc18c

commit 0a74cbd7740a4d37ab5d0482bef14e9e0cbcc18c
Author: Mikael Morin <[email protected]>
Date:   Fri Oct 17 12:29:05 2025 +0200

    Correction régression pr106918.f90

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

diff --git a/gcc/fortran/trans-types.cc b/gcc/fortran/trans-types.cc
index e3099515a878..f9c85bc8ba0f 100644
--- a/gcc/fortran/trans-types.cc
+++ b/gcc/fortran/trans-types.cc
@@ -1401,8 +1401,7 @@ gfc_typenode_for_spec (gfc_typespec * spec, int codim)
       break;
 
     case BT_CHARACTER:
-      basetype = gfc_get_character_type (spec->kind,
-                                        spec->deferred ? nullptr : spec->u.cl);
+      basetype = gfc_get_character_type (spec->kind, spec->u.cl);
       break;
 
     case BT_HOLLERITH:

Reply via email to