From 2e33ad2166889e6cb890ea7f3a8d6f5915d22be0 Mon Sep 17 00:00:00 2001
From: Janus Weil <janus@gcc.gnu.org>
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 <janus@gcc.gnu.org>
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 e01ae683f4f8..cc97cac24665 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2012-09-16 Janus Weil <janus@gcc.gnu.org>
+
+ 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 <janus@gcc.gnu.org>
PR fortran/54594
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c
index 0748b6af78b4..6a7b6c9d894b 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);
--
GitLab