Commit a4f759de by Steven G. Kargl

expr.c (gfc_check_pointer_assign): Fix typo in comment.

2018-01-08  Steven G. Kargl  <kargl@gcc.gnu.org>

	* expr.c (gfc_check_pointer_assign): Fix typo in comment.

From-SVN: r256352
parent 5ec3397e
2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
* expr.c (gfc_check_pointer_assign): Fix typo in comment.
2018-01-08 Paul Thomas <pault@gcc.gnu.org> 2018-01-08 Paul Thomas <pault@gcc.gnu.org>
PR fortran/83611 PR fortran/83611
......
...@@ -3911,7 +3911,7 @@ gfc_check_pointer_assign (gfc_expr *lvalue, gfc_expr *rvalue) ...@@ -3911,7 +3911,7 @@ gfc_check_pointer_assign (gfc_expr *lvalue, gfc_expr *rvalue)
/* Error for assignments of contiguous pointers to targets which is not /* Error for assignments of contiguous pointers to targets which is not
contiguous. Be lenient in the definition of what counts as contiguous. Be lenient in the definition of what counts as
congiguous. */ contiguous. */
if (lhs_attr.contiguous && !gfc_is_simply_contiguous (rvalue, false, true)) if (lhs_attr.contiguous && !gfc_is_simply_contiguous (rvalue, false, true))
gfc_error ("Assignment to contiguous pointer from non-contiguous " gfc_error ("Assignment to contiguous pointer from non-contiguous "
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment