aboutsummaryrefslogtreecommitdiff
path: root/lib/dejagnu.exp
diff options
context:
space:
mode:
authorRob Savoye <rob@welcomehome.org>2001-05-04 05:27:47 +0000
committerRob Savoye <rob@welcomehome.org>2001-05-04 05:27:47 +0000
commit5ccf248fcdf7ade30d9569d9d84fe92702ae519b (patch)
treedeb11d994610b30e4051adb74e1589301c92d943 /lib/dejagnu.exp
parent0abc6d284f4e8aabbea2ab78e43d4e900a6dcfbc (diff)
* lib/dejagnu.exp: Add $text\r\n to all strings, to make sure we
only get one line at a time.
Diffstat (limited to 'lib/dejagnu.exp')
-rwxr-xr-xlib/dejagnu.exp12
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/dejagnu.exp b/lib/dejagnu.exp
index f98effb..d550c5b 100755
--- a/lib/dejagnu.exp
+++ b/lib/dejagnu.exp
@@ -112,37 +112,37 @@ proc host_execute {args} {
spawn -noecho "./${executable}" ${params}
expect {
-re "\[0-9\]\[0-9\]:..:..:${text}\r\n" {
- regsub "\[\n\r\t\]*NOTE: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*NOTE: $text\r\n" $expect_out(0,string) "" output
verbose "$output" 3
set timetol 0
exp_continue
}
-re "NOTE:${text}*" {
- regsub "\[\n\r\t\]*NOTE: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*NOTE: $text\r\n" $expect_out(0,string) "" output
verbose "$output" 2
set timetol 0
exp_continue
}
-re "PASSED:${text}*" {
- regsub "\[\n\r\t\]*PASSED: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*PASSED: $text\r\n" $expect_out(0,string) "" output
pass "$output"
set timetol 0
exp_continue
}
-re "FAILED:${text}*" {
- regsub "\[\n\r\t\]*FAILED: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*FAILED: $text\r\n" $expect_out(0,string) "" output
fail "$output"
set timetol 0
exp_continue
}
-re "UNTESTED:${text}*" {
- regsub "\[\n\r\t\]*TESTED: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*TESTED: $text\r\n" $expect_out(0,string) "" output
untested "$output"
set timetol 0
exp_continue
}
-re "UNRESOLVED:${text}*" {
- regsub "\[\n\r\t\]*UNRESOLVED: " $expect_out(0,string) "" output
+ regsub "\[\n\r\t\]*UNRESOLVED: $text\r\n" $expect_out(0,string) "" output
unresolved "$output"
set timetol 0
exp_continue