diff options
| author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-04-27 19:44:42 +0000 |
|---|---|---|
| committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2011-04-27 19:44:42 +0000 |
| commit | 8344e389dcb05ca85547b483fda3f162749c4623 (patch) | |
| tree | fd603057e51b167ce401b71ded3a1766d62814a5 /gdb/testsuite | |
| parent | b00ad6ff40490d267f39169239bac49a50cc5748 (diff) | |
| download | gdb-8344e389dcb05ca85547b483fda3f162749c4623.zip gdb-8344e389dcb05ca85547b483fda3f162749c4623.tar.gz gdb-8344e389dcb05ca85547b483fda3f162749c4623.tar.bz2 | |
gdb/testsuite/
* lib/gdb.exp (gdb_test_multiple): Eror on newline in $message.
* gdb.base/ifelse.exp: Give names to the "" tests as `if true else
false #1', `if true else false #2' and `if true else false #3'.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/ifelse.exp | 9 | ||||
| -rw-r--r-- | gdb/testsuite/lib/gdb.exp | 4 |
3 files changed, 16 insertions, 3 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 575d18b..4aa5513 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2011-04-27 Jan Kratochvil <jan.kratochvil@redhat.com> + + * lib/gdb.exp (gdb_test_multiple): Eror on newline in $message. + * gdb.base/ifelse.exp: Give names to the "" tests as `if true else + false #1', `if true else false #2' and `if true else false #3'. + 2011-04-27 Ulrich Weigand <ulrich.weigand@linaro.org> * gdb.base/annota1.exp: Accept breakpoints-invalid annotation diff --git a/gdb/testsuite/gdb.base/ifelse.exp b/gdb/testsuite/gdb.base/ifelse.exp index 068957d..0a0bb0a 100644 --- a/gdb/testsuite/gdb.base/ifelse.exp +++ b/gdb/testsuite/gdb.base/ifelse.exp @@ -57,7 +57,8 @@ gdb_test_multiple "if 0\nend" $message { # bodies and hopefully the memory with be dirty and the problem # will show itself (this works at time of writing). -gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" "" +gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" \ + "if true else false #1" # with true condition set message "if 1 .. else with empty body" @@ -71,7 +72,8 @@ gdb_test_multiple "if 1\nelse\nend" $message { } # dirty memory -gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" "" +gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" \ + "if true else false #2" # with false condition set message "if 0 .. else with empty body" @@ -89,7 +91,8 @@ gdb_test_no_output "set confirm off" "" # Test that a define with an empty else can be replaced. # If there is memory corruption then free will fail. # dirty memory -gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" "" +gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" \ + "if true else false #3" # create gdb_test "define abc\nif 1\nelse\nend\nend" "" "create define with empty else" # call (note that condition is 1 so should pass) diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 805b7a2..5979888 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -597,6 +597,10 @@ proc gdb_test_multiple { command message user_code } { error "Invalid trailing newline in \"$message\" test" } + if [string match "*\[\r\n\]*" $message] { + error "Invalid newline in \"$message\" test" + } + # TCL/EXPECT WART ALERT # Expect does something very strange when it receives a single braced # argument. It splits it along word separators and performs substitutions. |