https://gcc.gnu.org/g:957c3ff7fa7b7fa56a766ba24a7eef5a09170c72

commit 957c3ff7fa7b7fa56a766ba24a7eef5a09170c72
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Jul 15 19:09:21 2025 +0200

    Correction indentation

Diff:
---
 gcc/fortran/trans-decl.cc | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/gcc/fortran/trans-decl.cc b/gcc/fortran/trans-decl.cc
index 69379147d57f..2996dd72e6aa 100644
--- a/gcc/fortran/trans-decl.cc
+++ b/gcc/fortran/trans-decl.cc
@@ -4775,14 +4775,14 @@ gfc_trans_deferred_vars (gfc_symbol * proc_sym, 
gfc_wrapped_block * block)
       /* Nullify explicit return class arrays on entry.  */
       tree type;
       tmp = get_proc_result (proc_sym);
-       if (tmp && GFC_CLASS_TYPE_P (TREE_TYPE (tmp)))
-         {
-           gfc_start_block (&init);
-           tmp = gfc_class_data_get (tmp);
-           type = TREE_TYPE (gfc_conv_descriptor_data_get (tmp));
-           gfc_conv_descriptor_data_set (&init, tmp, build_int_cst (type, 0));
-           gfc_add_init_cleanup (block, gfc_finish_block (&init), NULL_TREE);
-         }
+      if (tmp && GFC_CLASS_TYPE_P (TREE_TYPE (tmp)))
+       {
+         gfc_start_block (&init);
+         tmp = gfc_class_data_get (tmp);
+         type = TREE_TYPE (gfc_conv_descriptor_data_get (tmp));
+         gfc_conv_descriptor_data_set (&init, tmp, build_int_cst (type, 0));
+         gfc_add_init_cleanup (block, gfc_finish_block (&init), NULL_TREE);
+       }
     }

Reply via email to