re PR fortran/54594 ([OOP] Type-bound ASSIGNMENTs (elemental + array version) rejecte...

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

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index e01ae683f4f879ed9ba99945fd131c547ce82f98..cc97cac24665536ce78a328c5565b0f4b54cc005 100644 (file)
--- 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 0748b6af78b44d628e4ee42f10cae5c7ee51c33a..6a7b6c9d894b41e872851906b88d21d0b459bd7f 100644 (file)
--- 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);