diff options
Diffstat (limited to 'gdb/testsuite/lib/d-support.exp')
| -rw-r--r-- | gdb/testsuite/lib/d-support.exp | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gdb/testsuite/lib/d-support.exp b/gdb/testsuite/lib/d-support.exp index 717d88b..0714b40 100644 --- a/gdb/testsuite/lib/d-support.exp +++ b/gdb/testsuite/lib/d-support.exp @@ -17,11 +17,12 @@ # The result is 1 (true) for success, 0 (false) for failure. proc set_lang_d {} { - if [gdb_test_no_output "set language d"] { + if {[gdb_test_no_output "set language d"]} { return 0 } - if [gdb_test "show language" ".* source language is \"d\"." \ - "set language to \"d\""] { + if {[gdb_test "show language" \ + [string_to_regexp {The current source language is "d".}] \ + {set language to "d"}]} { return 0 } return 1 |