re PR fortran/77507 (gfortran rejects keyworded calls to procedures from intrinsic modules)

2016-09-10  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR fortran/77507
	* gfortran.dg/c_assoc_2.f03: Update for r240050
	* gfortran.dg/c_assoc_4.f90: Ditto.

From-SVN: r240073

gcc/testsuite/ChangeLog

+2016-09-10  Steven G. Kargl  <kargl@gcc.gnu.org>
+
+	PR fortran/77507
+	* gfortran.dg/c_assoc_2.f03: Update error message for revision 240050
+	* gfortran.dg/c_assoc_4.f90: Ditto.
+
 2016-09-10  Tom de Vries  <tom@codesourcery.com>
 
 	PR C/71602

gcc/testsuite/gfortran.dg/c_assoc_2.f03

@@ -20,7 +20,7 @@ contains
        call abort()
     end if
 
-    if(.not. c_associated()) then ! { dg-error "Missing actual argument 'C_PTR_1' in call to 'c_associated'" }
+    if(.not. c_associated()) then ! { dg-error "Missing actual argument" }
        call abort()
     end if
 

gcc/testsuite/gfortran.dg/c_assoc_4.f90

@@ -9,6 +9,6 @@ PROGRAM test
 
   TYPE (C_PTR) :: x, y
 
-  PRINT *, C_ASSOCIATED([x,y])  ! { dg-error "'C_PTR_1' argument of 'c_associated' intrinsic at .1. must be a scalar" }
+  PRINT *, C_ASSOCIATED([x,y])  ! { dg-error "'c_ptr_1' argument of 'c_associated' intrinsic at .1. must be a scalar" }
 
 END PROGRAM test