aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite
diff options
context:
space:
mode:
authorAndrew Burgess <aburgess@broadcom.com>2013-11-26 16:28:33 +0000
committerAndrew Burgess <aburgess@broadcom.com>2013-11-26 16:36:21 +0000
commitd24a9f159c4b62ea5a64f619bd2090bbc98d8abd (patch)
tree2e8f61eb7bcc2e624a7545f507ac7fb86e11a54e /gdb/testsuite
parent492e19d098f4bf4f22bac22815e9cb117be55b33 (diff)
downloadfsf-binutils-gdb-d24a9f159c4b62ea5a64f619bd2090bbc98d8abd.zip
fsf-binutils-gdb-d24a9f159c4b62ea5a64f619bd2090bbc98d8abd.tar.gz
fsf-binutils-gdb-d24a9f159c4b62ea5a64f619bd2090bbc98d8abd.tar.bz2
Tighten regexp in gdb.base/setshow.exp
https://sourceware.org/ml/gdb-patches/2013-11/msg00817.html gdb/testsuite/ChangeLog * gdb.base/setshow.exp: Add $gdb_prompt to the patterns in gdb_test_multiple.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r--gdb/testsuite/ChangeLog5
-rw-r--r--gdb/testsuite/gdb.base/setshow.exp4
2 files changed, 7 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 9438f48..618d672 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2013-11-26 Andrew Burgess <aburgess@broadcom.com>
+
+ * gdb.base/setshow.exp: Add $gdb_prompt to the patterns in
+ gdb_test_multiple.
+
2013-11-26 Tom Tromey <tromey@redhat.com>
* gdb.dwarf2/dw2-unspecified-ret-addr.S: Remove.
diff --git a/gdb/testsuite/gdb.base/setshow.exp b/gdb/testsuite/gdb.base/setshow.exp
index d9e71d3..305356b 100644
--- a/gdb/testsuite/gdb.base/setshow.exp
+++ b/gdb/testsuite/gdb.base/setshow.exp
@@ -169,7 +169,7 @@ gdb_test "show history expansion on" "History expansion on command input is on.*
set HOME ""
set test "show environment HOME"
gdb_test_multiple $test $test {
- -re "\nHOME = (.*).\n.*" {
+ -re "\nHOME = (\[^\r\n\]*)\[\r\n\]+$gdb_prompt $" {
set HOME $expect_out(1,string)
pass $test
}
@@ -185,7 +185,7 @@ gdb_test "show history filename" \
set PWD ""
set test "show working directory"
gdb_test_multiple "pwd" $test {
- -re "\nWorking directory (.*)..\n.*" {
+ -re "\nWorking directory (\[^\r\n\]*)\\.\[\r\n\]+$gdb_prompt $" {
set PWD $expect_out(1,string)
pass $test
}