26 lines
1.0 KiB
Diff
26 lines
1.0 KiB
Diff
|
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"
|
||
|
|