* check.c (gfc_check_num_images): Fix a pasto.
From-SVN: r250734
This commit is contained in:
parent
5edb1c48f8
commit
57b1c5e9ab
2 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2017-07-31 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
* check.c (gfc_check_num_images): Fix a pasto.
|
||||
|
||||
2017-07-29 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
* trans-decl.c (gfc_trans_use_stmts): Pass false as new argument to
|
||||
|
|
|
@ -5149,7 +5149,7 @@ gfc_check_num_images (gfc_expr *distance, gfc_expr *failed)
|
|||
return false;
|
||||
|
||||
if (!gfc_notify_std (GFC_STD_F2008_TS, "FAILED= argument to "
|
||||
"NUM_IMAGES at %L", &distance->where))
|
||||
"NUM_IMAGES at %L", &failed->where))
|
||||
return false;
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue