[patch, testsuite] PR35612: fix testcase

[Daniel Franke]

On behalf of the reporter (haven't looked into it in detail, but Tobias B. 
apparently has):

2009-01-03  Daniel E. Platt  <danp57@optonline.net>

	PR testsuite/35612
	* gfortran.dg/bind_c_usage_8.f03: Fixed dummy argument type.

Regresion tested on i686-pc-linux-gnu. Ok to commit?

Regards

	Daniel


Index: ../testsuite/gfortran.dg/bind_c_usage_8.f03
===================================================================
--- ../testsuite/gfortran.dg/bind_c_usage_8.f03 (revision 143030)
+++ ../testsuite/gfortran.dg/bind_c_usage_8.f03 (working copy)
@@ -10,7 +10,7 @@ MODULE ISO_C_UTILITIES
 CONTAINS
    FUNCTION C_F_STRING(CPTR) RESULT(FPTR)
      use, intrinsic :: iso_c_binding
-      TYPE(C_PTR), INTENT(IN) :: CPTR ! The C address
+      TYPE(C_PTR), VALUE, TARGET :: CPTR ! The C address
       CHARACTER(KIND=C_CHAR), DIMENSION(:), POINTER :: FPTR
       INTERFACE
          FUNCTION strlen(string) RESULT(len) BIND(C,NAME="strlen") ! { dg-
warning "Implicitly declared" }