Alien-Role-Alt
view release on metacpan or search on metacpan
t/alien_role_alt.t view on Meta::CPAN
use Test2::V0 -no_srand => 1;
use Test::Alien 0.79;
use Alien::Role::Alt;
use lib 'corpus/lib';
use Alien::libfoo2;
diag '';
diag '';
diag '';
diag '*********************************************';
diag '* WARNING: *';
diag '* Alien::Role::Alt has been deprecated! *';
diag '* Please use Alien::Build instead. *';
diag '*********************************************';
diag '';
diag '';
subtest 'test a share install' => sub {
alien_ok 'Alien::libfoo2';
subtest 'default' => sub {
like( Alien::libfoo2->cflags, qr{-I.*Alien-libfoo2/include -DFOO=1} );
like( Alien::libfoo2->libs, qr{-L.*Alien-libfoo2/lib -lfoo} );
like( Alien::libfoo2->cflags_static, qr{-I.*Alien-libfoo2/include -DFOO=1 -DFOO_STATIC=1} );
like( Alien::libfoo2->libs_static, qr{-L.*Alien-libfoo2/lib -lfoo -lbar -lbaz} );
is( Alien::libfoo2->version, '2.3.4' );
is( Alien::libfoo2->runtime_prop->{arbitrary}, 'two');
};
subtest 'foo1' => sub {
my $alien = Alien::libfoo2->alt('foo1');
isa_ok $alien, 'Alien::Base';
isa_ok $alien, 'Alien::libfoo2';
like( $alien->cflags, qr{-I.*Alien-libfoo2/include -DFOO=1} );
like( $alien->libs, qr{-L.*Alien-libfoo2/lib -lfoo} );
like( $alien->cflags_static, qr{-I.*Alien-libfoo2/include -DFOO=1 -DFOO_STATIC=1} );
like( $alien->libs_static, qr{-L.*Alien-libfoo2/lib -lfoo -lbar -lbaz} );
is( $alien->version, '2.3.4' );
is( $alien->runtime_prop->{arbitrary}, 'two');
};
subtest 'foo2' => sub {
my $alien = Alien::libfoo2->alt('foo2');
isa_ok $alien, 'Alien::Base';
isa_ok $alien, 'Alien::libfoo2';
like( $alien->cflags, qr{-I.*Alien-libfoo2/include -DFOO=2} );
like( $alien->libs, qr{-L.*Alien-libfoo2/lib -lfoo1} );
like( $alien->cflags_static, qr{-I.*Alien-libfoo2/include -DFOO=2 -DFOO_STATIC=2} );
like( $alien->libs_static, qr{-L.*Alien-libfoo2/lib -lfoo1 -lbar -lbaz} );
is( $alien->version, '2.3.5' );
is( $alien->runtime_prop->{arbitrary}, 'four');
};
subtest 'foo3' => sub {
( run in 1.140 second using v1.01-cache-2.11-cpan-cdf2f3d4e48 )