re PR fortran/58026 ([F03] Bad error recovery for allocatable component of undeclared type)

2014-01-12  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/58026
	* decl.c (gfc_match_data_decl): Improve error recovery.


2014-01-12  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/58026
	* gfortran.dg/alloc_comp_basics_6.f90: New.

From-SVN: r206564

gcc/fortran/ChangeLog

+2014-01-12  Janus Weil  <janus@gcc.gnu.org>
+
+	PR fortran/58026
+	* decl.c (gfc_match_data_decl): Improve error recovery.
+
 2014-01-09  Tobias Burnus  <burnus@net-b.de>
 
 	* cpp.c (gfc_cpp_handle_option): Add missing break.

gcc/fortran/decl.c

@@ -4287,12 +4287,10 @@ gfc_match_data_decl (void)
 	      || current_ts.u.derived->attr.zero_comp))
 	goto ok;
 
-      /* Now we have an error, which we signal, and then fix up
-	 because the knock-on is plain and simple confusing.  */
-      gfc_error_now ("Derived type at %C has not been previously defined "
-		     "and so cannot appear in a derived type definition");
-      current_attr.pointer = 1;
-      goto ok;
+      gfc_error ("Derived type at %C has not been previously defined "
+		 "and so cannot appear in a derived type definition");
+      m = MATCH_ERROR;
+      goto cleanup;
     }
 
 ok:

gcc/testsuite/ChangeLog

+2014-01-12  Janus Weil  <janus@gcc.gnu.org>
+
+	PR fortran/58026
+	* gfortran.dg/alloc_comp_basics_6.f90: New.
+
 2014-01-11  Steven G. Kargl  <kargl@gcc.gnu.org>
 
 	PR fortran/59700

gcc/testsuite/gfortran.dg/alloc_comp_basics_6.f90

+! { dg-do compile }
+!
+! PR 58026: Bad error recovery for allocatable component of undeclared type
+!
+! Contributed by Joost VandeVondele <Joost.VandeVondele@mat.ethz.ch>
+
+  type sysmtx_t
+     type(ext_complex_t), allocatable :: S(:)  ! { dg-error "has not been previously defined" }
+  end type
+
+end