Browse Source

[tests] simulate slow, small packets more quickly

simulate slow, small packets more quickly
1ms between chars is plenty slow; 100ms is excessive

fixup
master
Glenn Strauss 7 months ago
parent
commit
dc51e9d61c
  1. 10
      tests/LightyTest.pm

10
tests/LightyTest.pm

@ -234,15 +234,15 @@ sub handle_http {
print $remote $_;
diag("<< ".$_."\n") if $is_debug;
select(undef, undef, undef, 0.1);
select(undef, undef, undef, 0.001);
print $remote "\015";
select(undef, undef, undef, 0.1);
select(undef, undef, undef, 0.001);
print $remote "\012";
select(undef, undef, undef, 0.1);
select(undef, undef, undef, 0.001);
print $remote "\015";
select(undef, undef, undef, 0.1);
select(undef, undef, undef, 0.001);
print $remote "\012";
select(undef, undef, undef, 0.1);
select(undef, undef, undef, 0.001);
}
}

Loading…
Cancel
Save