The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
$|++;

BEGIN {
	@classes = qw(Brick);

	push @classes, map { "Brick::$_" } qw(
		Bucket Composers Dates Filters
		Profile Result
		);
	}

use Test::More tests => 2 + scalar @classes;

foreach my $class ( @classes )
	{
	#print STDERR "Trying $class";
	#<STDIN>;
	BAIL_OUT( "$class did not compile\n" ) unless use_ok( $class );
	diag( "$class ---> " . $class->VERSION() . "\n" ) if $ENV{DEBUG};
	}

# API shims
ok( defined &Brick::create_pool );
ok( ! eval { Brick->create_pool } );