https://gcc.gnu.org/g:48479558b5d687460ab547625a98b851ec422476

commit r16-2245-g48479558b5d687460ab547625a98b851ec422476
Author: Filip Kastl <fka...@suse.cz>
Date:   Tue Jul 15 08:39:00 2025 +0200

    fortran: Fix indentation
    
    Move a block of code two spaces to the left.  Commiting as obvious.
    
    gcc/fortran/ChangeLog:
    
            * resolve.cc (resolve_select_type): Fix indentation.
    
    Signed-off-by: Filip Kastl <fka...@suse.cz>

Diff:
---
 gcc/fortran/resolve.cc | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/gcc/fortran/resolve.cc b/gcc/fortran/resolve.cc
index 93df5d014fa2..c33bd17da2dc 100644
--- a/gcc/fortran/resolve.cc
+++ b/gcc/fortran/resolve.cc
@@ -11014,16 +11014,16 @@ resolve_select_type (gfc_code *code, gfc_namespace 
*old_ns)
         that does precisely this here (instead of using the
         'global' one).  */
 
-       /* First check the derived type import status.  */
-       if (gfc_current_ns->import_state != IMPORT_NOT_SET
-           && (c->ts.type == BT_DERIVED || c->ts.type == BT_CLASS))
-         {
-           st = gfc_find_symtree (gfc_current_ns->sym_root,
-                                  c->ts.u.derived->name);
-           if (!check_sym_import_status (c->ts.u.derived, st, NULL, old_code,
-                                         gfc_current_ns))
-             error++;
-         }
+      /* First check the derived type import status.  */
+      if (gfc_current_ns->import_state != IMPORT_NOT_SET
+         && (c->ts.type == BT_DERIVED || c->ts.type == BT_CLASS))
+       {
+         st = gfc_find_symtree (gfc_current_ns->sym_root,
+                                c->ts.u.derived->name);
+         if (!check_sym_import_status (c->ts.u.derived, st, NULL, old_code,
+                                       gfc_current_ns))
+           error++;
+       }
 
       const char * var_name = gfc_var_name_for_select_type_temp (orig_expr1);
       if (c->ts.type == BT_CLASS)

Reply via email to