From: Jan Kratochvil <jan.kratochvil@redhat.com>
Date: Mon, 6 Aug 2012 20:14:11 +0000 (+0000)
Subject: gdb/testsuite/
X-Git-Tag: sid-snapshot-20120901~268
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=777f26c29b7a8c9f5f3b99788736559c100f5217;p=external%2Fbinutils.git

gdb/testsuite/
	* gdb.base/list.exp (test_only_end): New function.
	Call it.
---

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  <jan.kratochvil@redhat.com>
+
+	* gdb.base/list.exp (test_only_end): New function.
+	Call it.
+
 2012-08-06  Tom Tromey  <tromey@redhat.com>
 
 	* 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"