X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frecurse.t;h=08524b14a795fe364942ef6daccd937ca8d0e2b4;hb=5f04c81daf0e38670b8dac45bd369bc508da50b6;hp=01a9ba11814f57fb239bf1cd096326e5c7898c52;hpb=8d1f46c5ea38e057de3ade70c5d81256aea7f873;p=p5sagit%2FDevel-Size.git diff --git a/t/recurse.t b/t/recurse.t index 01a9ba1..08524b1 100644 --- a/t/recurse.t +++ b/t/recurse.t @@ -6,28 +6,10 @@ # total_size([]) will NOT return the size of the ref + the array, it will only # return the size of the array alone! -use Test::More; +use Test::More tests => 3 + 4 *12; use strict; +use Devel::Size ':all'; -BEGIN - { - chdir 't' if -d 't'; - plan tests => 6 + 4 * 12; - - use lib '../lib'; - use lib '../blib/arch'; - use_ok('Devel::Size'); - } - -can_ok ('Devel::Size', qw/ - size - total_size - /); - -Devel::Size->import( qw(size total_size) ); - -die ("Uhoh, test uses an outdated version of Devel::Size") - unless is ($Devel::Size::VERSION, '0.72_52', 'VERSION MATCHES'); ############################################################################# # verify that pointer sizes in array slots are sensible: