t/01_mutex_channel2.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#!/usr/bin/env perl

use strict;
use warnings;

use Test::More;
use MCE::Mutex;

{
    my $mutex = MCE::Mutex->new( impl => 'Channel2' );

    is( $mutex->impl(), 'Channel2', 'implementation name 1' );
}

done_testing;