In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/8b5730700c25a05280970d71df4eb7ca45967f2b?hp=4b2bcf2b0939c3ea654c9b2ba72f9fcc63964cb7>

- Log -----------------------------------------------------------------
commit 8b5730700c25a05280970d71df4eb7ca45967f2b
Author: Father Chrysostomos <[email protected]>
Date:   Sat Jan 3 18:53:29 2015 -0800

    perl.h:MY_CXT_CLONE: void *, not void **
    
    C++ fails otherwise, and PL_my_cxt_list is void ** so individual
    elephants (aka elements) should be void *.
-----------------------------------------------------------------------

Summary of changes:
 perl.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl.h b/perl.h
index e35245f..2deb1d4 100644
--- a/perl.h
+++ b/perl.h
@@ -6156,7 +6156,7 @@ typedef struct am_table_short AMTS;
 /* Clones the per-interpreter data. */
 #  define MY_CXT_CLONE \
        my_cxt_t *my_cxtp = (my_cxt_t*)SvPVX(newSV(sizeof(my_cxt_t)-1));\
-       void ** old_my_cxtp = PL_my_cxt_list[MY_CXT_INDEX];             \
+       void * old_my_cxtp = PL_my_cxt_list[MY_CXT_INDEX];              \
        PL_my_cxt_list[MY_CXT_INDEX] = my_cxtp;                         \
        Copy(old_my_cxtp, my_cxtp, 1, my_cxt_t);
 

--
Perl5 Master Repository

Reply via email to