[p5sagit/p5-mst-13.2.git] / ext / B / t / bblock.t

#!./perl -Tw

BEGIN {
    chdir 't';
    @INC = '../lib';
    require Config;
    if (($Config::Config{'extensions'} !~ /\bB\b/) ){
        print "1..0 # Skip -- Perl configured without B module\n";
        exit 0;
    }
}

use Test::More tests => 1;

use_ok('B::Bblock', qw(find_leaders));

# Someone who understands what this module does, please fill this out.
Commit	Line	Data
7e521e02	1	#!./perl -Tw
	2
	3	BEGIN {
	4	chdir 't';
	5	@INC = '../lib';
9cd8f857	6	require Config;
	7	if (($Config::Config{'extensions'} !~ /\bB\b/) ){
	8	print "1..0 # Skip -- Perl configured without B module\n";
	9	exit 0;
	10	}
7e521e02	11	}
	12
	13	use Test::More tests => 1;
	14
	15	use_ok('B::Bblock', qw(find_leaders));
	16
	17	# Someone who understands what this module does, please fill this out.