aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base
diff options
context:
space:
mode:
authorPedro Alves <palves@redhat.com>2016-01-25 12:00:18 +0000
committerPedro Alves <palves@redhat.com>2016-01-25 13:15:11 +0000
commitf1da4b11eef6dba04a1cfa579c6ba313718105b8 (patch)
treee536817c8624980e05a753ea2274a3431340dee7 /gdb/testsuite/gdb.base
parent018a260a3b84c482af7751dfd98c91273d2265ce (diff)
downloadgdb-f1da4b11eef6dba04a1cfa579c6ba313718105b8.zip
gdb-f1da4b11eef6dba04a1cfa579c6ba313718105b8.tar.gz
gdb-f1da4b11eef6dba04a1cfa579c6ba313718105b8.tar.bz2
Move foreach_with_prefix to lib/gdb.exp
gdb/testsuite/ChangeLog: 2016-01-25 Pedro Alves <palves@redhat.com> * gdb.base/step-sw-breakpoint-adjust-pc.exp (foreach_with_prefix): Delete, moved to lib/gdb.exp. * gdb.threads/forking-threads-plus-breakpoint.exp (foreach_with_prefix): Likewise. * gdb.threads/process-dies-while-handling-bp.exp (foreach_with_prefix): Likewise. * lib/gdb.exp (foreach_with_prefix): New procedure.
Diffstat (limited to 'gdb/testsuite/gdb.base')
-rw-r--r--gdb/testsuite/gdb.base/step-sw-breakpoint-adjust-pc.exp12
1 files changed, 0 insertions, 12 deletions
diff --git a/gdb/testsuite/gdb.base/step-sw-breakpoint-adjust-pc.exp b/gdb/testsuite/gdb.base/step-sw-breakpoint-adjust-pc.exp
index 378d71c..28ffbe7 100644
--- a/gdb/testsuite/gdb.base/step-sw-breakpoint-adjust-pc.exp
+++ b/gdb/testsuite/gdb.base/step-sw-breakpoint-adjust-pc.exp
@@ -73,18 +73,6 @@ proc test {non_stop displaced always_inserted} {
}
}
-# Wrapper for foreach that calls with_test_prefix on each iteration,
-# including the iterator's current value in the prefix.
-
-proc foreach_with_prefix {var list body} {
- upvar 1 $var myvar
- foreach myvar $list {
- with_test_prefix "$var=$myvar" {
- uplevel 1 $body
- }
- }
-}
-
foreach_with_prefix non_stop { "off" "on" } {
foreach_with_prefix displaced_step { "off" "on" } {
foreach_with_prefix always_inserted { "off" "on" } {