You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by st...@apache.org on 2004/11/23 17:12:48 UTC
svn commit: r106309 - /perl/modperl/trunk/t/protocol/echo_nonblock.t
Author: stas
Date: Tue Nov 23 08:12:46 2004
New Revision: 106309
Modified:
perl/modperl/trunk/t/protocol/echo_nonblock.t
Log:
try to ensure a CPU context switch for the server
Modified: perl/modperl/trunk/t/protocol/echo_nonblock.t
Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/protocol/echo_nonblock.t?view=diff&rev=106309&p1=perl/modperl/trunk/t/protocol/echo_nonblock.t&r1=106308&p2=perl/modperl/trunk/t/protocol/echo_nonblock.t&r2=106309
==============================================================================
--- perl/modperl/trunk/t/protocol/echo_nonblock.t (original)
+++ perl/modperl/trunk/t/protocol/echo_nonblock.t Tue Nov 23 08:12:46 2004
@@ -21,6 +21,7 @@
# now get a timed out request
$expected = "TIMEUP";
+sleep 1; # try to ensure a CPU context switch for the server
print $socket "should timeout\n";
chomp($received = <$socket> || '');
ok t_cmp $received, $expected, "timed out";