2010-06-10 Steven G. Kargl <kargl@gcc.gnu.org>

	* resolve.c (resolve_operator): Fix whitespace.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@160584 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c
index 5f920c9..226c2f9 100644 (file)
--- a/gcc/fortran/resolve.c
+++ b/gcc/fortran/resolve.c
@@ -3615,11 +3615,11 @@ resolve_operator (gfc_expr *e)
              e->rank = op1->rank;
              if (e->shape == NULL)
                {
-                 t = compare_shapes(op1, op2);
+                 t = compare_shapes (op1, op2);
                  if (t == FAILURE)
                    e->shape = NULL;
                  else
-               e->shape = gfc_copy_shape (op1->shape, op1->rank);
+                   e->shape = gfc_copy_shape (op1->shape, op1->rank);
                }
            }
          else