[patch, fortran] PR46301 [4.6 Regression] Missing diagnosis for "len=:"

Jerry DeLisle jvdelisle@frontier.com
Sat Nov 27 22:39:00 GMT 2010


Committed as obvious as well as discussed with Tobias on IRC.  Regression tested 
on x86-64-Gnu-Linux,

Committed revision 167212.

Regards,

Jerry

2010-11-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/46301
	trans-expr.c (gfc_trans_assignment): Add error message for not
	implemented assignment to deferred-length character variable.


--- trunk/gcc/fortran/trans-expr.c	2010/11/27 21:27:49	167211
+++ trunk/gcc/fortran/trans-expr.c	2010/11/27 22:12:46	167212
@@ -5806,6 +5806,13 @@
  		      bool dealloc)
  {
    tree tmp;
+
+  if (expr1->ts.type == BT_CHARACTER && expr1->ts.deferred)
+    {
+      gfc_error ("Assignment to deferred-length character variable at %L "
+		 "not implemented", &expr1->where);
+      return NULL_TREE;
+    }

    /* Special case a single function returning an array.  */
    if (expr2->expr_type == EXPR_FUNCTION && expr2->rank > 0)



More information about the Fortran mailing list