diff options
Diffstat (limited to 'gdb/testsuite/lib/gdb.exp')
-rw-r--r-- | gdb/testsuite/lib/gdb.exp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index aed7e2d043c..80ed3fbcca7 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -2537,6 +2537,13 @@ proc allow_rust_tests {} { return 1 } +# Return a 1 fo rconfigurations that support GNU poke integration. + +proc allow_poke_tests {} { + set output [remote_exec host $::GDB "$::INTERNAL_GDBFLAGS --configuration"] + return [expr {[string first "--with-poke" $output] != -1}] +} + # Return a 1 for configurations that support Python scripting. gdb_caching_proc allow_python_tests {} { |