In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/5ec56f72b83ea3eb6d9392f581e43fb8cb33d983?hp=04ec184ac01659664eaf4d4475aabdd6a078c7ae>
- Log ----------------------------------------------------------------- commit 5ec56f72b83ea3eb6d9392f581e43fb8cb33d983 Author: Florian Ragwitz <[email protected]> Date: Mon Sep 27 09:05:17 2010 +0200 Fix compilation with c++ compilers ----------------------------------------------------------------------- Summary of changes: cpan/Digest-MD5/MD5.xs | 2 +- cpan/Digest-MD5/t/files.t | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/cpan/Digest-MD5/MD5.xs b/cpan/Digest-MD5/MD5.xs index ac36b05..e8b9504 100644 --- a/cpan/Digest-MD5/MD5.xs +++ b/cpan/Digest-MD5/MD5.xs @@ -480,7 +480,7 @@ static SV * new_md5_ctx(pTHX_ MD5_CTX *context, const char *klass) #ifdef USE_ITHREADS mg = #endif - sv_magicext(sv, NULL, PERL_MAGIC_ext, &vtbl_md5, (void *)context, 0); + sv_magicext(sv, NULL, PERL_MAGIC_ext, &vtbl_md5, (const char *)context, 0); #ifdef USE_ITHREADS mg->mg_flags |= MGf_DUP; diff --git a/cpan/Digest-MD5/t/files.t b/cpan/Digest-MD5/t/files.t index 854e76f..11f625a 100644 --- a/cpan/Digest-MD5/t/files.t +++ b/cpan/Digest-MD5/t/files.t @@ -14,14 +14,14 @@ my $EXPECT; if (ord "A" == 193) { # EBCDIC $EXPECT = <<EOT; 4f932585bed0cc942186fb51daff4839 README -7c769233985659318efbbb64f38d0ebd MD5.xs +b0f7cb93ec1b43f9417f089bb7b87bb0 MD5.xs 276da0aa4e9a08b7fe09430c9c5690aa rfc1321.txt EOT } else { # This is the output of: 'md5sum README MD5.xs rfc1321.txt' $EXPECT = <<EOT; c8d3f8457a2d6983253d771ffddb9f4c README -dab5596ff82930da5cdf75afcd255f9c MD5.xs +14b929c388c5a9bd8eca3d37160e1b8a MD5.xs 754b9db19f79dbc4992f7166eb0f37ce rfc1321.txt EOT } -- Perl5 Master Repository
