For the record, I committed the following:

2015-11-17  Steven G. Kargl  <ka...@gcc.gnu.org>

        * primary.c (gfc_match_structure_constructor): Fix whitespace.

-- 
Steve
Index: primary.c
===================================================================
--- primary.c   (revision 230494)
+++ primary.c   (working copy)
@@ -2709,21 +2709,21 @@ gfc_match_structure_constructor (gfc_sym
   e->value.function.esym = sym;
   e->symtree->n.sym->attr.generic = 1;
 
-   m = gfc_match_actual_arglist (0, &e->value.function.actual);
-   if (m != MATCH_YES)
-     {
-       gfc_free_expr (e);
-       return m;
-     }
-
-   if (!gfc_convert_to_structure_constructor (e, sym, NULL, NULL, false))
-     {
-       gfc_free_expr (e);
-       return MATCH_ERROR;
-     }
+  m = gfc_match_actual_arglist (0, &e->value.function.actual);
+  if (m != MATCH_YES)
+    {
+      gfc_free_expr (e);
+      return m;
+    }
 
-   *result = e;
-   return MATCH_YES;
+  if (!gfc_convert_to_structure_constructor (e, sym, NULL, NULL, false))
+    {
+      gfc_free_expr (e);
+      return MATCH_ERROR;
+    }
+
+  *result = e;
+  return MATCH_YES;
 }
 
 

Reply via email to