Help language development. Donate to The Perl Foundation

Audio::Convert::Samplerate cpan:JSTOWE last updated on 2019-01-12

t/010-constructor.t
#!perl6

use v6.c;
use Test;
plan 4;

use LibraryCheck;

use Audio::Convert::Samplerate;

if !library-exists('samplerate', v0) {
    skip-rest "no samplerate library, won't run tests";
    exit;
}

my $obj;

lives-ok { $obj = Audio::Convert::Samplerate.new }, "create a new Audio::Convert::Samplerate";
isa-ok($obj, Audio::Convert::Samplerate, 'and it is the right sort of object');
my $v;
lives-ok { $v = $obj.samplerate-version }, "get samplerate version";
isa-ok($v, Version, "and it is a version");
diag "testing with samplerate version " ~ $v;

done-testing;

# vim: expandtab shiftwidth=4 ft=perl6