generic-library/msgpack
1
0
Fork 0
mirror of https://github.com/msgpack/msgpack-c.git synced 2025-11-02 14:03:43 +01:00
Code Issues Projects Releases Wiki Activity

Perl: better argument validation(patch from dankogai)

Browse Source
This commit is contained in:
tokuhirom
2010-08-31 23:42:32 +09:00
parent 71a1cb0184
commit 23a7137e6a
2 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
perl/t/08_cycle.t
View File

@@ -2,7 +2,7 @@ use t::Util;
use Test::More;
use Data::MessagePack;
plan tests => 5;
plan tests => 6;
my $aref = [0];
$aref->[1] = $aref;
@@ -23,3 +23,6 @@ ok !$@;
eval { Data::MessagePack->pack($aref, 2) };
ok $@, $@;
eval { Data::MessagePack->pack($aref, -1) };
ok $@, $@;