diff options
| author | Simon Marchi <simon.marchi@polymtl.ca> | 2022-12-14 16:14:03 -0500 |
|---|---|---|
| committer | Simon Marchi <simon.marchi@efficios.com> | 2022-12-15 15:59:06 -0500 |
| commit | 69de431392408c2fe25227908612e2bfe7b05036 (patch) | |
| tree | 57308737cdc831cd0ebc8bde2c6ca646e225fe4f /gdb | |
| parent | 2e55fbce03a0bbee40032b486fe565bfc2423894 (diff) | |
| download | gdb-69de431392408c2fe25227908612e2bfe7b05036.zip gdb-69de431392408c2fe25227908612e2bfe7b05036.tar.gz gdb-69de431392408c2fe25227908612e2bfe7b05036.tar.bz2 | |
gdb/testsuite: don't delete command files in gdb.base/commands.exp
Don't delete the runtime-generated command files. This makes it easier
to reproduce tests by hand.
Change-Id: I4e53484eea216512f1c5d7dfcb5c464b36950946
Approved-By: Tom Tromey <tom@tromey.com>
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/gdb.base/commands.exp | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/gdb/testsuite/gdb.base/commands.exp b/gdb/testsuite/gdb.base/commands.exp index 933978c..929a48e 100644 --- a/gdb/testsuite/gdb.base/commands.exp +++ b/gdb/testsuite/gdb.base/commands.exp @@ -714,8 +714,6 @@ maintenance deprecate set qqq_aaa" gdb_test "set qqq_aaa" \ "Warning: 'set qqq_aaa', an alias for the command 'set xxx_yyy', is deprecated\\.\r\n.*No alternative known\\..*" \ "deprecated alias with prefix give a warning" - - file delete $file1 } # Test that the help for a command does not show deprecated aliases. @@ -848,7 +846,7 @@ proc_with_prefix stray_arg0_test { } { # Test that GDB is able to source a file with an indented comment. proc_with_prefix source_file_with_indented_comment {} { - set file1 [standard_output_file file1] + set file1 [standard_output_file source_file_with_indented_comment] set fd [open "$file1" w] puts $fd \ @@ -864,9 +862,9 @@ echo Done!\n} # Test that GDB can handle arguments when sourcing files recursively. # If the arguments are overwritten with ####### then the test has failed. proc_with_prefix recursive_source_test {} { - set file1 [standard_output_file file1] - set file2 [standard_output_file file2] - set file3 [standard_output_file file3] + set file1 [standard_output_file recursive_source_1] + set file2 [standard_output_file recursive_source_2] + set file3 [standard_output_file recursive_source_3] set fd [open "$file1" w] puts $fd \ @@ -892,10 +890,6 @@ end" gdb_test "source $file1" \ "1: <<<qwerty>>>\[\r\n]+in file3\[\r\n]+2: <<<qwerty>>>" \ "source file" - - file delete $file1 - file delete $file2 - file delete $file3 } proc gdb_test_no_prompt { command result msg } { |