On 11/14/19 1:31 AM, Jakub Jelinek wrote:
This broke on hosts where the system compiler doesn't have ISO_Fortran_binding.h header installed (e.g. GCC 8 and earlier).

Aha, that's the reason.

Fixed thusly, tested on x86_64-linux, committed to trunk as obvious.
2019-11-14  Jakub Jelinek  <ja...@redhat.com>

        * gfortran.dg/ISO_Fortran_binding_17.c: Include
        ../../../libgfortran/ISO_Fortran_binding.h rather than
        ISO_Fortran_binding.h.

Thanks, Jakub, for the fix and sorry all for the breakage. I try to remember in order to not do repeat this mistake :-/

Likewise fixed on GCC 9 as attached.

Tobias


commit 64785acc4083f9c18450e1ed37789a59a5572230
Author: burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Date:   Thu Nov 14 08:02:42 2019 +0000

    Fix gfortran.dg/ISO_Fortran_binding_17.c using rel. #include
    
            PR fortran/92470
            PR fortran/92500
            * gfortran.dg/ISO_Fortran_binding_17.c: Include
            ISO_Fortran_binding.h with relative path.
    
    
    
    git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-9-branch@278201 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 9ed961d3970..8f97012e5cd 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2019-11-13  Tobias Burnus  <tob...@codesourcery.com>
+
+	PR fortran/92470
+	PR fortran/92500
+	* gfortran.dg/ISO_Fortran_binding_17.c: Include
+	ISO_Fortran_binding.h with relative path.
+
 2019-11-13  Tobias Burnus  <tob...@codesourcery.com>
 
 	Backport from mainline
diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c
index b0893cc15e8..14dfcc90c4e 100644
--- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c
+++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c
@@ -2,7 +2,7 @@
 
 #include <stdio.h>
 #include <assert.h>
-#include "ISO_Fortran_binding.h"
+#include "../../../libgfortran/ISO_Fortran_binding.h"
 
 void Csub(const CFI_cdesc_t *, size_t, CFI_index_t invalid);
 

Reply via email to