summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>2017-07-31 09:32:02 +0000
committerjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>2017-07-31 09:32:02 +0000
commit4995d1b38523af79f5e79f914e05409f980e588f (patch)
tree9a685167995be1db5af7d1b85214ced1518f57b1
parent67b7c1c4fbf05260c93ab995ab5c99a0fa4d5e3a (diff)
downloadgcc-4995d1b38523af79f5e79f914e05409f980e588f.tar.gz
* check.c (gfc_check_num_images): Fix a pasto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@250734 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--gcc/fortran/ChangeLog4
-rw-r--r--gcc/fortran/check.c2
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 81b220ad776..dc0495af964 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -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
diff --git a/gcc/fortran/check.c b/gcc/fortran/check.c
index 45bc68ef7ad..e85e398cd43 100644
--- a/gcc/fortran/check.c
+++ b/gcc/fortran/check.c
@@ -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;
}