File gdb-testsuite-gdb-tui-new-layout-exp-partly-require-tcl86.patch of Package gdb
Index: gdb-10.1/gdb/testsuite/gdb.tui/new-layout.exp
===================================================================
--- gdb-10.1.orig/gdb/testsuite/gdb.tui/new-layout.exp
+++ gdb-10.1/gdb/testsuite/gdb.tui/new-layout.exp
@@ -42,12 +42,14 @@ gdb_test "tui new-layout example src 1 s
"Window \"src\" seen twice in layout"
gdb_test "tui new-layout example src 1" \
"New layout does not contain the \"cmd\" window"
-gdb_test "tui new-layout example src 1}" \
- "Extra '}' in layout specification"
-gdb_test "tui new-layout example {src 1} 1}" \
- "Extra '}' in layout specification"
-gdb_test "tui new-layout example {src 1" \
- "Missing '}' in layout specification"
+if { [tcl_version_at_least 8 6] } {
+ gdb_test "tui new-layout example src 1\}" \
+ "Extra '\}' in layout specification"
+ gdb_test "tui new-layout example {src 1} 1\}" \
+ "Extra '\}' in layout specification"
+ gdb_test "tui new-layout example \{src 1" \
+ "Missing '\}' in layout specification"
+}
gdb_test_no_output "tui new-layout example asm 1 status 0 cmd 1"