https://gcc.gnu.org/g:44959b9e60a913e4b1ed682a072a9c1e001d8ef2

commit 44959b9e60a913e4b1ed682a072a9c1e001d8ef2
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Wed Dec 11 17:12:16 2024 +0100

    Suppression fonction inutilisée

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

diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index 03175aff881e..dcbc75844fda 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -5723,6 +5723,7 @@ expr_may_alias_variables (gfc_expr *e, bool 
array_may_alias)
 
 /* A helper function to set the dtype for unallocated or unassociated
    entities.  */
+#if 0
 
 static void
 set_dtype_for_unallocated (gfc_se *parmse, gfc_expr *e)
@@ -5765,7 +5766,7 @@ set_dtype_for_unallocated (gfc_se *parmse, gfc_expr *e)
                   build_empty_stmt (input_location));
   gfc_add_expr_to_block (&parmse->pre, cond);
 }
-
+#endif
 
 
 /* Provide an interface between gfortran array descriptors and the F2018:18.4

Reply via email to