generic-library/msgpack
1
0
Fork 0
mirror of https://github.com/msgpack/msgpack-c.git synced 2025-04-01 17:24:59 +02:00
Code Issues Projects Releases Wiki Activity

perl: make test code more simple

Browse Source
This commit is contained in:
Fuji, Goro 2010-10-05 15:58:49 +09:00
parent 9346908485
commit f2d13cd647
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
perl/t/Util.pm
View File

@ -10,12 +10,8 @@ sub import {
warnings->import; warnings->import;
no strict 'refs'; no strict 'refs';
*{"$pkg\::true"} = sub () { *{"$pkg\::true"} = \&Data::MessagePack::true;
Data::MessagePack::true() *{"$pkg\::false"} = \&Data::MessagePack::false;
};
*{"$pkg\::false"} = sub () {
Data::MessagePack::false()
};
*{"$pkg\::null"} = sub() { undef }; *{"$pkg\::null"} = sub() { undef };
} }