trans-expr.c (gfc_trans_assignment_1): Correct a comment.

2009-08-29  Steven G. Kargl  <kargl@gcc.gnu.org>

	* trans-expr.c(gfc_trans_assignment_1): Correct a comment.

From-SVN: r151205

diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c
index a5677f70d8d17ac0c4005eb64946126fbb613d23..3d675eb0499287c6830dece8e988b61d90a88ecc 100644 (file)
--- a/gcc/fortran/trans-expr.c
+++ b/gcc/fortran/trans-expr.c
@@ -4786,7 +4786,7 @@ gfc_trans_array_constructor_copy (gfc_expr * expr1, gfc_expr * expr2)
 
 
 /* Subroutine of gfc_trans_assignment that actually scalarizes the
-   assignment.  EXPR1 is the destination/RHS and EXPR2 is the source/LHS.  */
+   assignment.  EXPR1 is the destination/LHS and EXPR2 is the source/RHS.  */
 
 static tree
 gfc_trans_assignment_1 (gfc_expr * expr1, gfc_expr * expr2, bool init_flag)