diff options
| author | dominiq <dominiq@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-05-17 17:54:50 +0000 |
|---|---|---|
| committer | dominiq <dominiq@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-05-17 17:54:50 +0000 |
| commit | a8bd4d823ee25b8e2a8df1adbd8abab7eb49d118 (patch) | |
| tree | 33f9efa6d4ccefb149aa8380dc9a02a13f26786e /gcc/fortran | |
| parent | e347a302c7eb69690b679a2f367fb37df797448f (diff) | |
| download | gcc-a8bd4d823ee25b8e2a8df1adbd8abab7eb49d118.tar.gz | |
2014-05-17 Dominique d'Humieres <dominiq@lps.ens.fr>
* check.c (gfc_check_fn_rc2008): move "argument" to the right
place.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@210561 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/check.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 606f6df20af..64174b0c10f 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2014-05-17 Dominique d'Humieres <dominiq@lps.ens.fr> + + * check.c (gfc_check_fn_rc2008): move "argument" to the right + place. + 2014-05-12 Tobias Burnus <burnus@net-b.de> PR fortran/60127 diff --git a/gcc/fortran/check.c b/gcc/fortran/check.c index f58452dfdc4..9dd60718a33 100644 --- a/gcc/fortran/check.c +++ b/gcc/fortran/check.c @@ -1821,8 +1821,8 @@ gfc_check_fn_rc2008 (gfc_expr *a) return false; if (a->ts.type == BT_COMPLEX - && !gfc_notify_std (GFC_STD_F2008, "COMPLEX '%s' " - "argument of '%s' intrinsic at %L", + && !gfc_notify_std (GFC_STD_F2008, "COMPLEX argument '%s' " + "of '%s' intrinsic at %L", gfc_current_intrinsic_arg[0]->name, gfc_current_intrinsic, &a->where)) return false; |