X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F03-size.t;h=d8953b237fc2d5c297d2cd2cb8afa15299bc7872;hb=HEAD;hp=8751911ed5c0f82e8617db33e7a8aedf36a63eed;hpb=f77706f0734eb34a9623cc492b5d73061fba9b62;p=perl%2Fmodules%2FScalar-Vec-Util.git

diff --git a/t/03-size.t b/t/03-size.t
index 8751911..d8953b2 100644
--- a/t/03-size.t
+++ b/t/03-size.t
@@ -5,19 +5,19 @@ use warnings;
 
 use Test::More;
 
-use Scalar::Vec::Util qw/SVU_SIZE SVU_PP/;
+use Scalar::Vec::Util qw<SVU_SIZE SVU_PP>;
 
 if (SVU_PP) {
  plan tests => 1;
 
- diag('Using pure perl fallbacks');
+ diag 'Using pure perl fallbacks';
 
- is(SVU_SIZE, 1, 'SVU_SIZE is 1');
+ is SVU_SIZE, 1, 'SVU_SIZE is 1';
 } else {
  plan tests => 2;
 
- diag('Using an unit of ' . SVU_SIZE . ' bits');
+ diag 'Using an unit of ' . SVU_SIZE . ' bits';
 
- ok(SVU_SIZE >= 8,   'SVU_SIZE is greater than 8');
- is(SVU_SIZE % 8, 0, 'SVU_SIZE is a multiple of 8');
+ cmp_ok SVU_SIZE, '>=', 8, 'SVU_SIZE is greater than 8';
+ is     SVU_SIZE % 8,   0, 'SVU_SIZE is a multiple of 8';
 }