[gdb/testsuite, tclint] Fix lib/go.exp
diff --git a/gdb/tclint.toml b/gdb/tclint.toml index 589f352..522b6ec 100644 --- a/gdb/tclint.toml +++ b/gdb/tclint.toml
@@ -43,7 +43,6 @@ "gdb/testsuite/lib/gdbserver-support.exp", "gdb/testsuite/lib/gdb-utils.exp", "gdb/testsuite/lib/gen-perf-test.exp", -"gdb/testsuite/lib/go.exp", "gdb/testsuite/lib/jit-elf-helpers.exp", "gdb/testsuite/lib/mi-support.exp", "gdb/testsuite/lib/objc.exp",
diff --git a/gdb/testsuite/lib/go.exp b/gdb/testsuite/lib/go.exp index 5f668e2..dcf7ffa 100644 --- a/gdb/testsuite/lib/go.exp +++ b/gdb/testsuite/lib/go.exp
@@ -20,11 +20,12 @@ # The result is 1 (true) for success, 0 (false) for failure. proc set_lang_go {} { - if [gdb_test_no_output "set language go"] { + if {[gdb_test_no_output "set language go"]} { return 0 } - if [gdb_test "show language" ".* source language is \"go\"." \ - "set language to \"go\""] { + if {[gdb_test "show language" \ + [string_to_regexp {The current source language is "go".}] \ + {set language to "go"}]} { return 0 } return 1