aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.fortran
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.fortran')
-rw-r--r--gdb/testsuite/gdb.fortran/array-slices.exp4
-rw-r--r--gdb/testsuite/gdb.fortran/lbound-ubound.exp8
2 files changed, 4 insertions, 8 deletions
diff --git a/gdb/testsuite/gdb.fortran/array-slices.exp b/gdb/testsuite/gdb.fortran/array-slices.exp
index 56bed15..ce17b8d 100644
--- a/gdb/testsuite/gdb.fortran/array-slices.exp
+++ b/gdb/testsuite/gdb.fortran/array-slices.exp
@@ -36,9 +36,7 @@
require allow_fortran_tests
# This test relies on output from the inferior.
-if [target_info exists gdb,noinferiorio] {
- return -1
-}
+require {!target_info exists gdb,noinferiorio}
standard_testfile ".f90"
load_lib fortran.exp
diff --git a/gdb/testsuite/gdb.fortran/lbound-ubound.exp b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
index bb652a9..fced41f 100644
--- a/gdb/testsuite/gdb.fortran/lbound-ubound.exp
+++ b/gdb/testsuite/gdb.fortran/lbound-ubound.exp
@@ -17,6 +17,9 @@
require allow_fortran_tests
+# This test relies on output from the inferior.
+require {!target_info exists gdb,noinferiorio}
+
standard_testfile ".F90"
load_lib fortran.exp
@@ -32,11 +35,6 @@ if ![fortran_runto_main] {
return -1
}
-# This test relies on output from the inferior.
-if [target_info exists gdb,noinferiorio] {
- return 0
-}
-
# Avoid libc symbols, in particular the 'array' type.
gdb_test_no_output "nosharedlibrary"