[binutils-gdb] testsuite, fortran: make kfail gfortran specific

[Abdul Basit Ijaz]

https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=056f6ae0f3794186997dd760e100f39ef8fac8ac

commit 056f6ae0f3794186997dd760e100f39ef8fac8ac
Author: Nils-Christian Kempke <nils-christian.kempke@intel.com>
Date:   Tue May 31 18:10:18 2022 +0200

    testsuite, fortran: make kfail gfortran specific
    
    The modified test in function-calls.exp actually passes with ifort and
    ifx.  The particular fail seems to be specific to gfortran.  When the
    test was introduced it was only tested with gfortran (actually the
    whole patch was written with gfortran and the GNU Fortran argument
    passing convention in mind).
    
    Approved-by: Tom Tromey <tom@tromey.com>

Diff:
---
 gdb/testsuite/gdb.fortran/function-calls.exp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gdb/testsuite/gdb.fortran/function-calls.exp b/gdb/testsuite/gdb.fortran/function-calls.exp
index f9a1efc241f..646fbb06435 100644
--- a/gdb/testsuite/gdb.fortran/function-calls.exp
+++ b/gdb/testsuite/gdb.fortran/function-calls.exp
@@ -101,7 +101,9 @@ gdb_test "p sum_some(1,2)" " = 3"
 
 # Paragraph 10: optional value arguments. There is insufficient DWARF
 # information to reliably make this case work.
-setup_kfail "gdb/24305" *-*-*
+if { [test_compiler_info {gfortran-*} f90] } {
+    setup_kfail "gdb/24305" *-*-*
+}
 gdb_test "p one_arg_value(10)" " = 10"
 
 # DW_AT_artificial formal parameters must be passed manually. This