--- /usr/share/dejagnu/dejagnu.exp.old 2014-10-08 13:38:57.274068541 -0400 +++ /usr/share/dejagnu/dejagnu.exp 2014-10-10 12:27:51.113813659 -0400 @@ -113,8 +113,6 @@ proc host_execute {args} { set timetol 0 set arguments "" - expect_before buffer_full { perror "Buffer full" } - if { [llength $args] == 0} { set executable $args } else { @@ -133,6 +131,8 @@ proc host_execute {args} { # test case. # spawn -noecho -open [open "|./${executable}" "r"] spawn -noecho "./${executable}" ${params} + expect_before full_buffer { perror "Buffer full" } + set prefix "\[^\r\n\]*" expect { -re "^$prefix\[0-9\]\[0-9\]:..:..:${text}*\r\n" {