From: kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Fri, 11 Jun 2010 00:06:30 +0000 (+0000)
Subject: 2010-06-10  Steven G. Kargl  <kargl@gcc.gnu.org>
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4c0165a9e7394ed309aaaa8ad19de713f3b4107f;p=thirdparty%2Fgcc.git

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 5f920c9e3d3c..226c2f9197bc 100644
--- 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