[gdb/testsuite] Fix gnat_runtime_has_debug_info for remote host
authorTom de Vries <tdevries@suse.de>
Mon, 27 Mar 2023 21:11:41 +0000 (23:11 +0200)
committerTom de Vries <tdevries@suse.de>
Mon, 27 Mar 2023 21:11:41 +0000 (23:11 +0200)
Fix gnat_runtime_has_debug_info for remote host by checking for
allow_ada_tests.

This fixes an error for test-case gdb.testsuite/gdb-caching-proc.exp and
remote host.

Tested on x86_64-linux.

gdb/testsuite/lib/ada.exp

index 02a5d1ad271837acf1dcee9b5f79ad49f5a32ede..4395f31ad942d3fb6b2df1af1f6eebab29c04188 100644 (file)
@@ -167,6 +167,10 @@ proc gnatmake_version_at_least { major } {
 # Return 1 if the GNAT runtime appears to have debug info.
 
 gdb_caching_proc gnat_runtime_has_debug_info {} {
+    if { ![allow_ada_tests] } {
+       return 0
+    }
+
     global srcdir
 
     set src "$srcdir/lib/gnat_debug_info_test.adb"