re PR fortran/88072 (gfortran crashes with an internal compiler error)

2019-08-13  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR fortran/88072
	* gfortran.dg/unlimited_polymorphic_28.f90: Fix error message.  Left
	out of previous commit!

From-SVN: r274400

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 00785812a8eb6a71870cf9acb93a66b7d37e7abd..c0a7d2dc236cb93f5683d5b09e49510ea5195fce 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2019-08-13  Steven G. Kargl  <kargl@gcc.gnu.org> 
+
+       PR fortran/88072
+       * gfortran.dg/unlimited_polymorphic_28.f90: Fix error message.  Left
+       out of previous commit!
+
 2019-08-13  Steven G. Kargl  <kargl@gcc.gnu.org>
 
        PR fortran/88072

diff --git a/gcc/testsuite/gfortran.dg/unlimited_polymorphic_28.f90 b/gcc/testsuite/gfortran.dg/unlimited_polymorphic_28.f90
index b474a243233d997a13952c64677037c2d04f605b..a9f67273d5ed08aea48ca3a7e1551bca57997263 100644 (file)
--- a/gcc/testsuite/gfortran.dg/unlimited_polymorphic_28.f90
+++ b/gcc/testsuite/gfortran.dg/unlimited_polymorphic_28.f90
@@ -21,7 +21,7 @@ implicit none
 
   type,abstract,extends(c_base) :: c_derived
   contains
-    procedure :: f_base => f_derived ! { dg-error "Type mismatch in function result \\(CLASS\\(\\*\\)/CLASS\\(c_base\\)\\)" }
+    procedure :: f_base => f_derived ! { dg-error "Type mismatch in function result" }
   end type c_derived
 
 contains