Re: Making perl with -Wall

Message-ID: <Pine.SOL.4.10.10105241415460.2443-100000@maxwell.phys.lafayette.edu>

p4raw-id: //depot/perl@10200

diff --git a/perl.h b/perl.h
index ab99e85..9283e8e 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -226,11 +226,7 @@ struct perl_thread;
 #endif
 
 #define NOOP (void)0
-#ifdef HASATTRIBUTE
 #define dNOOP extern int Perl___notused __attribute__ ((unused))
-#else
-#define dNOOP extern int Perl___notused
-#endif
 
 #ifndef pTHX
 #  define pTHX         void