Changes to perlfaq8 "How do I find out if I'm running interactively
[p5sagit/p5-mst-13.2.git] / malloc.c
index 4f0bb4a..94fcb15 100644 (file)
--- a/malloc.c
+++ b/malloc.c
 #     define pTHX              void
 #     define pTHX_
 #     ifdef HASATTRIBUTE_UNUSED
-#        define dTHX           PERL_UNUSED_DECL(extern int Perl___notused)
+#        define dTHX           extern int Perl___notused PERL_UNUSED_DECL
 #     else
 #        define dTHX            extern int Perl___notused
 #     endif