From 2e33ad2166889e6cb890ea7f3a8d6f5915d22be0 Mon Sep 17 00:00:00 2001 From: Janus Weil Date: Mon, 17 Sep 2012 00:04:26 +0200 Subject: [PATCH] re PR fortran/54594 ([OOP] Type-bound ASSIGNMENTs (elemental + array version) rejected as ambiguous) 2012-09-16 Janus Weil PR fortran/54594 * resolve.c (get_checked_tb_operator_target): Add a reference to the relevant quote from the F08 standard. From-SVN: r191366 --- gcc/fortran/ChangeLog | 6 ++++++ gcc/fortran/resolve.c | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index e01ae683f4f..cc97cac2466 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2012-09-16 Janus Weil + + PR fortran/54594 + * resolve.c (get_checked_tb_operator_target): Add a reference to the + relevant quote from the F08 standard. + 2012-09-16 Janus Weil PR fortran/54594 diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 0748b6af78b..6a7b6c9d894 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -11429,7 +11429,7 @@ get_checked_tb_operator_target (gfc_tbp_generic* target, locus where) target_proc = target->specific->u.specific->n.sym; gcc_assert (target_proc); - /* All operator bindings must have a passed-object dummy argument. */ + /* F08:C468. All operator bindings must have a passed-object dummy argument. */ if (target->specific->nopass) { gfc_error ("Type-bound operator at %L can't be NOPASS", &where); -- 2.30.2