[gcc(refs/users/mikael/heads/refactor_descriptor_v08)] Correction régression PR100120

Mikael Morin mikael@gcc.gnu.org
Sun Sep 14 12:43:56 GMT 2025


https://gcc.gnu.org/g:67da786bdccd8420cbc800736bc8fdea70cb3b68

commit 67da786bdccd8420cbc800736bc8fdea70cb3b68
Author: Mikael Morin <mikael@gcc.gnu.org>
Date:   Sun Sep 14 13:43:25 2025 +0200

    Correction régression PR100120

Diff:
---
 libgfortran/libgfortran.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h
index 70b7b40fb29d..e87989ad66eb 100644
--- a/libgfortran/libgfortran.h
+++ b/libgfortran/libgfortran.h
@@ -485,7 +485,7 @@ typedef GFC_FULL_ARRAY_DESCRIPTOR (GFC_MAX_DIMENSIONS, GFC_INTEGER_4) gfc_full_a
 
 #define GFC_DESCRIPTOR_STRIDE(desc,i) ((desc)->dim[i]._stride)
 #define GFC_DESCRIPTOR_STRIDE_BYTES(desc,i) \
-  (GFC_DESCRIPTOR_STRIDE(desc,i) * GFC_DESCRIPTOR_SIZE(desc))
+  (GFC_DESCRIPTOR_STRIDE(desc,i) * GFC_DESCRIPTOR_SPAN(desc))
 
 /* Macros to get both the size and the type with a single masking operation  */


More information about the Gcc-cvs mailing list