diff options
Diffstat (limited to 'gdb/testsuite/gdb.base')
-rw-r--r-- | gdb/testsuite/gdb.base/info-types.exp.tcl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gdb/testsuite/gdb.base/info-types.exp.tcl b/gdb/testsuite/gdb.base/info-types.exp.tcl index 2989751..0eac3db 100644 --- a/gdb/testsuite/gdb.base/info-types.exp.tcl +++ b/gdb/testsuite/gdb.base/info-types.exp.tcl @@ -168,13 +168,6 @@ proc run_test { lang } { if { $state == 2 } { set state -4 } exp_continue } - -re -wrap "" { - if { $state == 3} { - pass $gdb_test_name - } else { - fail "$gdb_test_name (state == $state)" - } - } -re "^\r\n(\[^\r\n\]*)(?=\r\n)" { if { $state == 2 } { set line $expect_out(1,string) @@ -187,6 +180,13 @@ proc run_test { lang } { } exp_continue } + -re -wrap "" { + if { $state == 3} { + pass $gdb_test_name + } else { + fail "$gdb_test_name (state == $state)" + } + } } } |