Abstract all the accesses to cop_arybase (apart from ByteLoader)

[perl5.git] / malloc.c

diff --git a/malloc.c b/malloc.c
index 94fcb15..4f0bb4a 100644 (file)
--- a/malloc.c
+++ b/malloc.c
@@ -409,7 +409,7 @@
 #     define pTHX              void
 #     define pTHX_
 #     ifdef HASATTRIBUTE_UNUSED
-#        define dTHX           extern int Perl___notused PERL_UNUSED_DECL
+#        define dTHX           PERL_UNUSED_DECL(extern int Perl___notused)
 #     else
 #        define dTHX            extern int Perl___notused
 #     endif