This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
__attribute__ problems with g++
authorMattia Barbon <mbarbon@dsi.unive.it>
Sun, 31 Mar 2002 22:43:03 +0000 (00:43 +0200)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 31 Mar 2002 19:45:33 +0000 (19:45 +0000)
From: "Mattia Barbon" <mbarbon@dsi.unive.it>
Message-ID: <3CA790F7.23864.27BD5B4@localhost>

p4raw-id: //depot/perl@15635

perl.h

diff --git a/perl.h b/perl.h
index e34ace3..442935f 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -131,7 +131,11 @@ struct perl_thread;
 #endif
 
 #ifdef HASATTRIBUTE
-#  define PERL_UNUSED_DECL __attribute__((unused))
+#  if defined(__GNUC__) && defined(__cplusplus)
+#    define PERL_UNUSED_DECL
+#  else
+#    define PERL_UNUSED_DECL __attribute__((unused))
+#  endif
 #else
 #  define PERL_UNUSED_DECL
 #endif