generic-library/msgpack
1
0
Fork 0
mirror of https://github.com/msgpack/msgpack-c.git synced 2025-10-22 16:02:30 +02:00
Code Issues Projects Releases Wiki Activity

perl: modified a serious code typo in PP

Browse Source
This commit is contained in:
makamaka
2010-09-20 11:49:52 +09:00
parent 53899cc492
commit d973192b5e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
perl/lib/Data/MessagePack/PP.pm
View File

@@ -87,7 +87,7 @@ BEGIN {
return unpack( 'd', pack( 'N2', @v[1,0] ) ); return unpack( 'd', pack( 'N2', @v[1,0] ) );
}; };
*unpack_int64 = $unpack_int64_slow ||_sub { *unpack_int64 = $unpack_int64_slow || sub {
my @v = unpack( 'V*', substr( $_[0], $_[1], 8 ) ); my @v = unpack( 'V*', substr( $_[0], $_[1], 8 ) );
return unpack( 'q', pack( 'N2', @v[1,0] ) ); return unpack( 'q', pack( 'N2', @v[1,0] ) );
}; };