[gdb/testsuite] Check compilation result in gdb.dwarf2/dw2-opt-structptr.exp
authorTom de Vries <tdevries@suse.de>
Thu, 30 Sep 2021 17:07:48 +0000 (19:07 +0200)
committerTom de Vries <tdevries@suse.de>
Thu, 30 Sep 2021 17:07:48 +0000 (19:07 +0200)
When running test-case gdb.dwarf2/dw2-opt-structptr.exp with target board
unix/-bad, I get:
...
gdb compile failed, gcc: error: unrecognized command line option '-bad'
UNTESTED: gdb.dwarf2/dw2-opt-structptr.exp: dw2-opt-structptr.exp
UNTESTED: gdb.dwarf2/dw2-opt-structptr.exp: failed to compile
ERROR: (dw2-opt-structptr) No such file or directory
UNRESOLVED: gdb.dwarf2/dw2-opt-structptr.exp: console: set print object on
...

Merge the two UNTESTEDs.

Fix the UNRESOLVED by checking result of compilation.

Tested on x86_64-linux.

gdb/testsuite/gdb.dwarf2/dw2-opt-structptr.exp

index 6883b086b89730852922ace7a341ef19c76a1749..82a53a3d2eaab4af5d3cb425bc7c704b3a63c7b4 100644 (file)
@@ -123,8 +123,7 @@ proc build_test_program {} {
     }
     
     set sources "$srcfile $asm_file"
-    if {[build_executable $testfile.exp $testfile $sources {nodebug}]} { 
-       untested "failed to compile"
+    if {[build_executable "failed to compile" $testfile $sources {nodebug}]} {
        return -1
     }
 }
@@ -245,6 +244,9 @@ proc do_mi_test {} {
     }
 }
 
-build_test_program
+if { [build_test_program] == -1 } {
+    return -1
+}
+
 do_console_test
 do_mi_test