use strict;
use warnings;
-use Test::More tests => 6;
+use Test::More;
+use Algorithm::C3; # we already did use_ok 10 times by now..
-BEGIN {
- use_ok('Algorithm::C3');
-}
+plan skip_all => "Your system has no SIGALRM" if !exists $SIG{ALRM};
+plan tests => 5;
=pod
else {
ok(0, "Infinite loop apparently succeeded???");
}
-
}