[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction régression class_transformational_2

[Mikael Morin via Gcc-cvs]

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

commit 0c41996ac310a67e5d6c20d2feedd562afa9d8b5
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Thu May 22 22:24:42 2025 +0200

    Correction régression class_transformational_2

Diff:
---
 libgfortran/intrinsics/eoshift0.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/libgfortran/intrinsics/eoshift0.c 
b/libgfortran/intrinsics/eoshift0.c
index 383b7e392b0a..3dfc428a0f9b 100644
--- a/libgfortran/intrinsics/eoshift0.c
+++ b/libgfortran/intrinsics/eoshift0.c
@@ -67,6 +67,7 @@ eoshift0 (gfc_array_char * ret, const gfc_array_char * array,
 
       ret->offset = 0;
       GFC_DTYPE_COPY(ret,array);
+      GFC_DESCRIPTOR_SPAN (ret) = GFC_DESCRIPTOR_SPAN (array);
 
       for (i = 0; i < GFC_DESCRIPTOR_RANK (array); i++)
         {