summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--patchlevel.h2
-rw-r--r--perl.h19
2 files changed, 10 insertions, 11 deletions
diff --git a/patchlevel.h b/patchlevel.h
index c11598ce24..42347bc621 100644
--- a/patchlevel.h
+++ b/patchlevel.h
@@ -68,7 +68,7 @@
applied different patches than you.
*/
#if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
-static char *local_patches[] = {
+static char * __attribute__ ((unused)) local_patches[] = {
NULL
,NULL
};
diff --git a/perl.h b/perl.h
index d9dcbba26f..2fbd39f6f8 100644
--- a/perl.h
+++ b/perl.h
@@ -151,6 +151,14 @@ functions are now member functions of the PERL_OBJECT.
*/
+#ifndef NEXT30_NO_ATTRIBUTE
+# ifndef HASATTRIBUTE /* disable GNU-cc attribute checking? */
+# ifdef __attribute__ /* Avoid possible redefinition errors */
+# undef __attribute__
+# endif
+# define __attribute__(attr)
+# endif
+#endif
class CPerlObj;
@@ -221,7 +229,7 @@ struct perl_thread;
#endif
#define NOOP (void)0
-#define dNOOP extern int Perl___notused
+#define dNOOP extern int __attribute__ ((unused)) Perl___notused
#ifndef pTHX
# define pTHX void
@@ -2664,15 +2672,6 @@ typedef void *Thread;
# define PERL_CALLCONV
#endif
-#ifndef NEXT30_NO_ATTRIBUTE
-# ifndef HASATTRIBUTE /* disable GNU-cc attribute checking? */
-# ifdef __attribute__ /* Avoid possible redefinition errors */
-# undef __attribute__
-# endif
-# define __attribute__(attr)
-# endif
-#endif
-
#ifdef PERL_OBJECT
# define PERL_DECL_PROT
#endif