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 *.

1 files changed, 1 insertions, 1 deletions

diff --git a/perl.h b/perl.h
index e35245f693..2deb1d4f0c 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);