summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-02-24 11:47:08 +0000
committerNicholas Clark <nick@ccl4.org>2010-05-24 15:15:26 +0100
commitf7abe70be985cb9179c2e728a593cb8a5c8e049d (patch)
treecaa50831f19cd6adb6b56628295289b526e4acb1 /embed.h
parenta09252eb79f700c93c37322c1ad831cf3193571b (diff)
downloadperl-f7abe70be985cb9179c2e728a593cb8a5c8e049d.tar.gz
Abstract *correct* initialisation of CLONE_PARAMS into Perl_clone_params_new().
As it allocates memory dynamically, add Perl_clone_params_del(). This will allow CLONE_PARAMS to be expand in future in a source and binary compatible fashion. These implementations of Perl_clone_params_new()/Perl_clone_params_del() jump through hoops to remain source and binary compatible, in particular, by not assuming that the structure member is present and correctly initialised. Hence they should be suitable for inclusion into Devel::PPPort. Convert threads.xs to use them, resolving RT #73046.
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/embed.h b/embed.h
index 02871f2419..819f76a4ea 100644
--- a/embed.h
+++ b/embed.h
@@ -2043,6 +2043,8 @@
#ifdef PERL_CORE
#define boot_core_mro Perl_boot_core_mro
#endif
+#if defined(USE_ITHREADS)
+#endif
#define ck_anoncode Perl_ck_anoncode
#define ck_bitop Perl_ck_bitop
#define ck_chdir Perl_ck_chdir
@@ -4478,6 +4480,8 @@
#endif
#ifdef PERL_CORE
#endif
+#if defined(USE_ITHREADS)
+#endif
#define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a)
#define ck_bitop(a) Perl_ck_bitop(aTHX_ a)
#define ck_chdir(a) Perl_ck_chdir(aTHX_ a)