r8876 - in /trunk/libdigest-crc-perl: Changes README debian/changelog lib/Digest/CRC.pm t/crc.t
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Mon Nov 5 18:43:45 UTC 2007
Author: gregoa-guest
Date: Mon Nov 5 18:43:45 2007
New Revision: 8876
URL: http://svn.debian.org/wsvn/?sc=1&rev=8876
Log:
New upstream release,
Modified:
trunk/libdigest-crc-perl/Changes
trunk/libdigest-crc-perl/README
trunk/libdigest-crc-perl/debian/changelog
trunk/libdigest-crc-perl/lib/Digest/CRC.pm
trunk/libdigest-crc-perl/t/crc.t
Modified: trunk/libdigest-crc-perl/Changes
URL: http://svn.debian.org/wsvn/trunk/libdigest-crc-perl/Changes?rev=8876&op=diff
==============================================================================
--- trunk/libdigest-crc-perl/Changes (original)
+++ trunk/libdigest-crc-perl/Changes Mon Nov 5 18:43:45 2007
@@ -37,3 +37,6 @@
0.13 Sun Nov 4 11:22:54 2007
- fixed tests
+0.14 Mon Nov 5 08:10:11 2007
+ - fixed __reflect error in non XS part
+
Modified: trunk/libdigest-crc-perl/README
URL: http://svn.debian.org/wsvn/trunk/libdigest-crc-perl/README?rev=8876&op=diff
==============================================================================
--- trunk/libdigest-crc-perl/README (original)
+++ trunk/libdigest-crc-perl/README Mon Nov 5 18:43:45 2007
@@ -1,4 +1,4 @@
-Digest::CRC version 0.13
+Digest::CRC version 0.14
========================
NAME
@@ -41,3 +41,9 @@
make test
make install
+COPYRIGHT AND LICENCE
+ CRC algorithm code taken from "A PAINLESS GUIDE TO CRC ERROR DETECTION
+ ALGORITHMS".
+
+ The author of this package disclaims all copyrights and releases it
+ into the public domain.
Modified: trunk/libdigest-crc-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libdigest-crc-perl/debian/changelog?rev=8876&op=diff
==============================================================================
--- trunk/libdigest-crc-perl/debian/changelog (original)
+++ trunk/libdigest-crc-perl/debian/changelog Mon Nov 5 18:43:45 2007
@@ -1,3 +1,9 @@
+libdigest-crc-perl (0.14-1) UNRELEASED; urgency=low
+
+ * New upstream release,
+
+ -- gregor herrmann <gregor+debian at comodo.priv.at> Mon, 05 Nov 2007 19:42:38 +0100
+
libdigest-crc-perl (0.13-1) unstable; urgency=low
* New upstream release.
Modified: trunk/libdigest-crc-perl/lib/Digest/CRC.pm
URL: http://svn.debian.org/wsvn/trunk/libdigest-crc-perl/lib/Digest/CRC.pm?rev=8876&op=diff
==============================================================================
--- trunk/libdigest-crc-perl/lib/Digest/CRC.pm (original)
+++ trunk/libdigest-crc-perl/lib/Digest/CRC.pm Mon Nov 5 18:43:45 2007
@@ -16,7 +16,7 @@
crc32_hex crc32_base64
);
-$VERSION = '0.13';
+$VERSION = '0.14';
$XS_VERSION = $VERSION;
$VERSION = eval $VERSION;
@@ -85,7 +85,7 @@
sub _crc {
my ($message,$width,$init,$xorout,$refin,$refout,$tab) = @_;
my $crc = $init;
- $crc = __reflect($crc,$width) if $refin;
+ $crc = _reflect($crc,$width) if $refin;
my $pos = -length $message;
my $mask = 2**$width-1;
while ($pos) {
Modified: trunk/libdigest-crc-perl/t/crc.t
URL: http://svn.debian.org/wsvn/trunk/libdigest-crc-perl/t/crc.t?rev=8876&op=diff
==============================================================================
--- trunk/libdigest-crc-perl/t/crc.t (original)
+++ trunk/libdigest-crc-perl/t/crc.t Mon Nov 5 18:43:45 2007
@@ -45,17 +45,17 @@
$ctx->addfile(F);
close(F);
my $y = $ctx->digest;
-ok($y == 1413438101, 'OO crc32 with addfile '.$y);
+ok($y == 2371909219, 'OO crc32 with addfile '.$y);
# start at offset >0 with previous checksum result
-$ctx = Digest::CRC->new(type=>"crc32",cont=>1,init=>1413438101);
+$ctx = Digest::CRC->new(type=>"crc32",cont=>1,init=>460478609);
open(F,"<README")||die "Cannot open README";
use Fcntl qw(:seek);
seek(F,989,Fcntl::SEEK_SET);
$ctx->addfile(F);
close(F);
$y = $ctx->digest;
-ok($y == 1413438101, 'OO crc32 with init and addfile '.$y);
+ok($y == 2371909219, 'OO crc32 with init and addfile '.$y);
$ctx = Digest::CRC->new(type=>"crcccitt");
$ctx->add($input);
More information about the Pkg-perl-cvs-commits
mailing list