mirror of
https://github.com/msgpack/msgpack-c.git
synced 2025-10-23 00:08:01 +02:00
perl: disable warnings
This commit is contained in:
@@ -480,6 +480,7 @@ sub execute {
|
|||||||
|
|
||||||
sub _count {
|
sub _count {
|
||||||
my ( $self, $value ) = @_;
|
my ( $self, $value ) = @_;
|
||||||
|
no warnings; # FIXME
|
||||||
my $byte = unpack( 'C', substr( $value, $p++, 1 ) ); # get header
|
my $byte = unpack( 'C', substr( $value, $p++, 1 ) ); # get header
|
||||||
|
|
||||||
Carp::croak('invalid data') unless defined $byte;
|
Carp::croak('invalid data') unless defined $byte;
|
||||||
|
Reference in New Issue
Block a user