File Coverage

blib/lib/ZMQ/Constants/V2_1_11.pm

Criterion	Covered	Total	%
statement	9	9	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	12	12	100.0

package ZMQ::Constants::V2_1_11;
use strict;
use Storable ();
use ZMQ::Constants ();

my %not_in_v2 = (
    ZMQ_MAXMSGSIZE          => 22,
    ZMQ_SNDHWM              => 23,
    ZMQ_RCVHWM              => 24,
    ZMQ_MULTICAST_HOPS      => 25,
    ZMQ_RCVTIMEO            => 27,
    ZMQ_SNDTIMEO            => 28,
    ZMQ_IPV4ONLY            => 31,
    ZMQ_LAST_ENDPOINT       => 32,
    ZMQ_MORE                => 1,
    ZMQ_DONTWAIT            => 1,
    ZMQ_FAIL_UNROUTABLE     => 1,
);

my $export_tags = Storable::dclone( \%ZMQ::Constants::EXPORT_TAGS );
$export_tags->{socket} = [
    (grep { ! $not_in_v2{$_} } @{ $export_tags->{socket} }),
];
$export_tags->{message} = [ qw(ZMQ_MAX_VSM_SIZE ZMQ_DELIMITER ZMQ_VSM ZMQ_MSG_MORE ZMQ_MSG_SHARED ZMQ_MSG_MASK) ];

ZMQ::Constants::register_set(
    '2.1.11' => (
        tags => $export_tags
    )
);

1;