diff options
author | Dustin Sallings <dustin@spy.net> | 2009-03-01 10:46:09 -0800 |
---|---|---|
committer | Dustin Sallings <dustin@spy.net> | 2009-03-01 10:46:09 -0800 |
commit | a34f78e0e753bd51bf1c48bf9cdda6688ae6aa92 (patch) | |
tree | 67e604f1c227bbfb5f664af8d3f223ab36148e38 /t/00-startup.t | |
parent | 013e17cc7487d3d24c7f6b30c206bd6421ed6f6d (diff) | |
download | memcached-a34f78e0e753bd51bf1c48bf9cdda6688ae6aa92.tar.gz |
Isolate the first server in startup test so it dies sooner (bug 20).
Apparently on some version of Linux I don't have, this causes the test
to hang for a while as gcov attempts to compute and write out the
results from two coverage runs concurrently.
It's best to clean up things as quickly as possible in the general
case, so this should be done regardless.
Diffstat (limited to 't/00-startup.t')
-rwxr-xr-x | t/00-startup.t | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/t/00-startup.t b/t/00-startup.t index 7c90b61..a0fda0c 100755 --- a/t/00-startup.t +++ b/t/00-startup.t @@ -1,14 +1,16 @@ #!/usr/bin/perl use strict; -use Test::More tests => 3; +use Test::More tests => 4; use FindBin qw($Bin); use lib "$Bin/lib"; use MemcachedTest; -my $server = new_memcached(); - -ok($server, "started the server"); +eval { + my $server = new_memcached(); + ok($server, "started the server"); +}; +is($@, '', 'Basic startup works'); eval { my $server = new_memcached("-l fooble"); |