diff options
author | Jakub Jelinek <jakub@gcc.gnu.org> | 2019-10-31 17:37:55 +0100 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2019-10-31 17:37:55 +0100 |
commit | aaa80941e042d18dcd5add6e7bb28cb392767a39 (patch) | |
tree | 9eb883f5c435f693a47ecce900d4dec41bb00439 | |
parent | ffff4877dad7d5adc282d83b48b3386030b18f82 (diff) | |
download | gcc-aaa80941e042d18dcd5add6e7bb28cb392767a39.zip gcc-aaa80941e042d18dcd5add6e7bb28cb392767a39.tar.gz gcc-aaa80941e042d18dcd5add6e7bb28cb392767a39.tar.bz2 |
re PR fortran/92284 (Subroutine with bind(c) attribute causing varied problems)
PR fortran/92284
* gfortran.dg/bind_c_array_params_3_aux.c: Include
../../../libgfortran/ISO_Fortran_binding.h rather than
ISO_Fortran_binding.h.
From-SVN: r277679
-rw-r--r-- | gcc/testsuite/ChangeLog | 9 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c | 3 |
2 files changed, 9 insertions, 3 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 4c85975..4660d2f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2019-10-31 Jakub Jelinek <jakub@redhat.com> + + PR fortran/92284 + * gfortran.dg/bind_c_array_params_3_aux.c: Include + ../../../libgfortran/ISO_Fortran_binding.h rather than + ISO_Fortran_binding.h. + 2019-10-31 Tobias Burnus <tobias@codesourcery.com> * gfortran.dg/achar_2.f90: Remove bogus line from @@ -31,7 +38,7 @@ 2019-10-31 Tobias Burnus <tobias@codesourcery.com> - PR fortran/92284. + PR fortran/92284 * gfortran.dg/bind-c-intent-out.f90: Update expected dump; extend comment. * gfortran.dg/bind_c_array_params_3.f90: New. diff --git a/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c b/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c index 6e13aa3..07d1a03 100644 --- a/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c +++ b/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c @@ -5,7 +5,7 @@ #include <errno.h> #include <stdio.h> -#include "ISO_Fortran_binding.h" +#include "../../../libgfortran/ISO_Fortran_binding.h" void arr_set_c(CFI_cdesc_t*); @@ -24,4 +24,3 @@ void arr_set_c(CFI_cdesc_t *arr){ for(i=0; i<ub[0]-lb[0]+1; i++) auxp[i]=i; return; } - |