In perl.git, the branch smoke-me/avreal-padlist has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/6882050390a4738d41e949768fa92e4d02a4a666?hp=2bfd61fe1ea9816b3fcae66ab17db341731994d9>
- Log -----------------------------------------------------------------
commit 6882050390a4738d41e949768fa92e4d02a4a666
Author: Father Chrysostomos <spr...@cpan.org>
Date: Wed Aug 31 22:42:35 2011 -0700
Cast for g++
-----------------------------------------------------------------------
Summary of changes:
pad.c | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/pad.c b/pad.c
index c324d05..763e01b 100644
--- a/pad.c
+++ b/pad.c
@@ -2156,7 +2156,7 @@ Perl_padlist_dup(pTHX_ AV *srcpad, CLONE_PARAMS *param)
dstpad = (AV*)ptr_table_fetch(PL_ptr_table, srcpad);
if (dstpad)
- return SvREFCNT_inc_simple_NN(dstpad);
+ return (AV *)SvREFCNT_inc_simple_NN(dstpad);
dstpad = newAV();
ptr_table_store(PL_ptr_table, srcpad, dstpad);
--
Perl5 Master Repository
