gdb

[deliverable/binutils-gdb.git] / gdb / testsuite / lib / mi-support.exp

diff --git a/gdb/testsuite/lib/mi-support.exp b/gdb/testsuite/lib/mi-support.exp
index 6b25f69db2af01564905628c1d35f7a7ac23ce9d..e75a4f5e8b01c15e3bd8f8c15ad56882da0e51e2 100644 (file)
--- a/gdb/testsuite/lib/mi-support.exp
+++ b/gdb/testsuite/lib/mi-support.exp
@@ -575,6 +575,7 @@ proc mi_gdb_test { args } {
     global verbose
     global mi_gdb_prompt
     global GDB expect_out
+    global inferior_exited_re
     upvar timeout timeout
 
     set command [lindex $args 0]
@@ -698,7 +699,7 @@ proc mi_gdb_test { args } {
             fail "$message"
            set result 1
        }
-        -re "Program exited with code \[0-9\]+.*$mi_gdb_prompt\[ \]*$" {
+        -re "$inferior_exited_re with code \[0-9\]+.*$mi_gdb_prompt\[ \]*$" {
            if ![string match "" $message] then {
                set errmsg "$message (the program exited)"
            } else {