X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frecurse.t;h=08524b14a795fe364942ef6daccd937ca8d0e2b4;hb=5f04c81daf0e38670b8dac45bd369bc508da50b6;hp=00233b82967da429ac40cbaa11dc03f6d9ffa4e3;hpb=1c566e6ab8500795b29fd593e67aa8d6f1aa9b0b;p=p5sagit%2FDevel-Size.git diff --git a/t/recurse.t b/t/recurse.t index 00233b8..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_50', 'VERSION MATCHES'); ############################################################################# # verify that pointer sizes in array slots are sensible: