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

commit da5ac05fe24322022f5c004b266c864f7b58b69e
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Dec 17 15:48:04 2024 +0100

    Correction bornes descripteur null

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

diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index 758c45b7d347..a6480077a3bc 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -146,8 +146,8 @@ gfc_conv_null_array_descriptor (gfc_se *se, gfc_symbol 
*sym, gfc_expr *expr)
 
   for (int i = 0; i < expr->rank; i++)
     {
-      lower[i] = gfc_index_zero_node;
-      upper[i] = gfc_index_one_node;
+      lower[i] = NULL_TREE;
+      upper[i] = NULL_TREE;
     }
 
   tree elt_type = gfc_typenode_for_spec (&sym->ts);

Reply via email to