mirror of
https://github.com/isc-projects/bind9.git
synced 2026-03-09 01:30:39 -04:00
4476. [test] Fix reclimit test on slower machines. [RT #43283]
This commit is contained in:
parent
67cdd2d3a4
commit
a0f9aaa103
2 changed files with 5 additions and 0 deletions
2
CHANGES
2
CHANGES
|
|
@ -1,3 +1,5 @@
|
|||
4476. [test] Fix reclimit test on slower machines. [RT #43283]
|
||||
|
||||
4475. [doc] Update named-checkconf documentation. [RT #43153]
|
||||
|
||||
4474. [bug] win32: call WSAStartup in fromtext_in_wks so that
|
||||
|
|
|
|||
|
|
@ -12,6 +12,7 @@ use warnings;
|
|||
use IO::File;
|
||||
use Getopt::Long;
|
||||
use Net::DNS::Nameserver;
|
||||
use Time::HiRes qw(usleep nanosleep);
|
||||
|
||||
my $pidf = new IO::File "ans.pid", "w" or die "cannot open pid file: $!";
|
||||
print $pidf "$$\n" or die "cannot write pid file: $!";
|
||||
|
|
@ -51,6 +52,8 @@ sub reply_handler {
|
|||
STDOUT->flush();
|
||||
|
||||
$count += 1;
|
||||
# Sleep 100ms to make sure that named sends both A and AAAA queries.
|
||||
usleep(100000);
|
||||
|
||||
if ($qname eq "count" ) {
|
||||
if ($qtype eq "TXT") {
|
||||
|
|
|
|||
Loading…
Reference in a new issue