From 13875f3bda06ded148da2fae89020d6b5de1813a Mon Sep 17 00:00:00 2001 From: Tom Yu Date: Wed, 28 Jan 2009 00:32:29 +0000 Subject: [PATCH] Run a single expect statement to read from both client and server, to avoid an apparent race condition on Darwin. git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@21814 dc483132-0cff-0310-8789-dd5450dbe970 --- src/lib/rpc/unit-test/rpc_test.0/fullrun.exp | 25 +++++++------------- 1 file changed, 9 insertions(+), 16 deletions(-) diff --git a/src/lib/rpc/unit-test/rpc_test.0/fullrun.exp b/src/lib/rpc/unit-test/rpc_test.0/fullrun.exp index 7cdda8af1..2b2d20520 100644 --- a/src/lib/rpc/unit-test/rpc_test.0/fullrun.exp +++ b/src/lib/rpc/unit-test/rpc_test.0/fullrun.exp @@ -19,22 +19,16 @@ set ver_line "rpc_test server: bad verifier\[^\r\n\]*\[\r\n]+" set dots 0 set server_lines 0 while {1} { - set oldtimeout $timeout - set timeout 5 - while {1} { - expect { - -i $server_id - -re $ver_line { - verbose "Got line from server." - incr server_lines - } - default { - break - } - } - } - set timeout $oldtimeout expect { + -i $server_id + -re $ver_line { + verbose "Got line from server." + incr server_lines + } + default { + exp_continue + } + -i $client_id . { incr dots @@ -54,7 +48,6 @@ while {1} { fail "full run: timeout waiting for dot" break } - } } if {$dots==11} { -- 2.26.2