Restyle tests

[perl/modules/Scalar-Vec-Util.git] / t / 03-size.t

diff --git a/t/03-size.t b/t/03-size.t
index d32e3d942e2a1528393f19aa44b2ad3723f62692..d8953b237fc2d5c297d2cd2cb8afa15299bc7872 100644 (file)
--- a/t/03-size.t
+++ b/t/03-size.t
@@ -10,14 +10,14 @@ 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';
 }