diff options
author | Nils-Christian Kempke <nils-christian.kempke@intel.com> | 2022-05-31 16:43:44 +0200 |
---|---|---|
committer | Nils-Christian Kempke <nils-christian.kempke@intel.com> | 2022-05-31 16:44:55 +0200 |
commit | 93bbd6c793f028afde22d6a6ad52edd812be8160 (patch) | |
tree | 1dc65da0108d1acab046948a268579d9fdd21c7f /gdb/testsuite | |
parent | 87364601b87da148b9c4b96aa164e329794c2959 (diff) |
testsuite, fortran: add required external keyword
Currenlty, ifx/ifort cannot compile the given executable as it is not
valid Fortran. It is missing the external keyword on the
no_arg_subroutine. Gfortran compiles the example but this is actually
a bug and there is an open gcc ticket for this here:
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=50377
Adding the keyword does not change the gfortran compiling of the example.
It will, however, prevent a future fail once 50377 has been addressed.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/gdb.fortran/function-calls.f90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.fortran/function-calls.f90 b/gdb/testsuite/gdb.fortran/function-calls.f90 index b56c5c97f7..e9c8c44afd 100644 --- a/gdb/testsuite/gdb.fortran/function-calls.f90 +++ b/gdb/testsuite/gdb.fortran/function-calls.f90 @@ -198,6 +198,7 @@ program function_calls type(cart_nd) :: c_nd type(nested_cart_3d) :: nested_c character(40) :: returned_string, returned_string_debugger + external no_arg_subroutine real8 = 3.00 real4 = 9.3 integer_array = 17 |