From: Tom de Vries <tdevries@suse.de>
Date: Fri, 5 May 2023 16:57:06 +0000 (+0200)
Subject: [gdb/testsuite] Generate long string in gdb.base/page.exp
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=c5ba639d1b5ed9fe7ec8046e770e54679541f0e4;p=binutils-gdb.git

[gdb/testsuite] Generate long string in gdb.base/page.exp

I noticed in gdb.base/page.exp:
...
set fours [string repeat 4 40]
...
but then shortly afterwards:
...
    [list 1\r\n 2\r\n 3\r\n 444444444444444444444444444444]
...

Summarize the long string in the same way using string repeat:
...
    [list 1\r\n 2\r\n 3\r\n [string repeat 4 30]]
...

Tested on x86_64-linux.
---

diff --git a/gdb/testsuite/gdb.base/page.exp b/gdb/testsuite/gdb.base/page.exp
index 327f953c520..f7b1317e39c 100644
--- a/gdb/testsuite/gdb.base/page.exp
+++ b/gdb/testsuite/gdb.base/page.exp
@@ -90,7 +90,7 @@ gdb_test_no_output "set width 30"
 send_gdb "printf \"$str\"\n"
 gdb_expect_list "paged count for interrupt" \
     ".*$pagination_prompt" \
-    [list 1\r\n 2\r\n 3\r\n 444444444444444444444444444444]
+    [list 1\r\n 2\r\n 3\r\n [string repeat 4 30]]
 
 gdb_test "q" "Quit" "quit while paging"