diff options
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/lib/gdb.exp | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 6b0692dd00c..2d96caa0e73 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2013-03-26 Pedro Alves <palves@redhat.com> + + * lib/gdb.exp (skip_btrace_tests): Delay deleting the source file + until after GDB has run. + 2013-03-26 Yao Qi <yao@codesourcery.com> * gdb.trace/actions.c, gdb.trace/circ.c: Add license header. diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index ee9fdecd261..d05257d0f3c 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -2129,10 +2129,10 @@ proc skip_btrace_tests {} { verbose "$me: compiling testfile $src" 2 set compile_flags {debug nowarnings quiet} set lines [gdb_compile $src $exe executable $compile_flags] - file delete $src if ![string match "" $lines] then { verbose "$me: testfile compilation failed, returning 1" 2 + file delete $src return [set skip_btrace_tests_saved 1] } @@ -2140,8 +2140,10 @@ proc skip_btrace_tests {} { clean_restart btrace[pid].x if ![runto_main] { + file delete $src return [set skip_btrace_tests_saved 1] } + file delete $src # In case of an unexpected output, we return 2 as a fail value. set skip_btrace_tests_saved 2 gdb_test_multiple "record btrace" "check btrace support" { |