From 4ccd57ed119eae3847df1ec241daa509f3b86ef3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Thu, 18 Jun 2015 13:19:49 +0200 Subject: [PATCH] Revert "const the core magic vtables" MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This reverts commit c910fead7893fe9700031ee59de6b904260b5d69. It's necessary for Coro-6.43. This patch will be removed once Coro will be fixed or in a reasonable time if Coro become unamaintained. Signed-off-by: Petr Písař --- perl.h | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/perl.h b/perl.h index dcb184b..9bce052 100644 --- a/perl.h +++ b/perl.h @@ -5583,7 +5583,14 @@ EXTCONST runops_proc_t PL_runops_std EXTCONST runops_proc_t PL_runops_dbg INIT(Perl_runops_debug); -#define EXT_MGVTBL EXTCONST MGVTBL +/* PERL_GLOBAL_STRUCT_PRIVATE wants to keep global data like the + * magic vtables const, but this is incompatible with SWIG which + * does want to modify the vtables. */ +#ifdef PERL_GLOBAL_STRUCT_PRIVATE +# define EXT_MGVTBL EXTCONST MGVTBL +#else +# define EXT_MGVTBL EXT MGVTBL +#endif #define PERL_MAGIC_READONLY_ACCEPTABLE 0x40 #define PERL_MAGIC_VALUE_MAGIC 0x80 -- 2.1.0