From 777f26c29b7a8c9f5f3b99788736559c100f5217 Mon Sep 17 00:00:00 2001 From: Jan Kratochvil Date: Mon, 6 Aug 2012 20:14:11 +0000 Subject: gdb/testsuite/ * gdb.base/list.exp (test_only_end): New function. Call it. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.base/list.exp | 7 +++++++ 2 files changed, 12 insertions(+) (limited to 'gdb/testsuite') diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 3f2e496..a85ea17 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2012-08-06 Jan Kratochvil + + * gdb.base/list.exp (test_only_end): New function. + Call it. + 2012-08-06 Tom Tromey * gdb.python/py-mi.exp: Add test for printer whose children diff --git a/gdb/testsuite/gdb.base/list.exp b/gdb/testsuite/gdb.base/list.exp index 16d25d2..6b5b207 100644 --- a/gdb/testsuite/gdb.base/list.exp +++ b/gdb/testsuite/gdb.base/list.exp @@ -505,6 +505,12 @@ proc test_forward_search {} { verbose "Timeout is now $timeout seconds" 2 } +proc test_only_end {} { + gdb_test_no_output "set listsize 2" + gdb_test "list 1" "list 1\r\n1\[ \t\]\[^\r\n\]*\r\n2\[ \t\]\[^\r\n\]*" + gdb_test "list ,5" "list ,5\r\n4\[ \t\]\[^\r\n\]*\r\n5\[ \t\]\[^\r\n\]*" +} + # Start with a fresh gdb. gdb_exit @@ -526,6 +532,7 @@ if [ set_listsize 10 ] then { test_list_range test_list_filename_and_function test_forward_search + test_only_end } remote_exec build "rm -f list0.h" -- cgit v1.1