re PR fortran/85407 (Replace gcc_assert in module.c:read_module by more helpful diagnostics)

2018-12-26  Harald Anlauf  <anlauf@gmx.de>

	PR fortran/85407
	* module.c (read_module): Convert assert to fatal error to give 
	user a sensible error message.

From-SVN: r267422

gcc/fortran/ChangeLog

+2018-12-26  Harald Anlauf  <anlauf@gmx.de>
+
+	PR fortran/85407
+	* module.c (read_module): Convert assert to fatal error to give a
+	sensible error message.
+
 2018-12-24  Steven G. Kargl  <kargl@gcc.gnu.org>
 
 	PR fortran/45513

gcc/fortran/module.c

@@ -5180,7 +5180,13 @@ read_module (void)
 	      if (p->u.pointer == NULL)
 		associate_integer_pointer (p, c);
 	      mio_pool_string (&comp_name);
-	      gcc_assert (comp_name == c->name);
+	      if (comp_name != c->name)
+		{
+		  gfc_fatal_error ("Mismatch in components of derived type "
+				   "%qs from %qs at %C: expecting %qs, "
+				   "but got %qs", sym->name, sym->module,
+				   c->name, comp_name);
+		}
 	      skip_list (1); /* component end.  */
 	    }
 	  mio_rparen (); /* component list closing.  */