RC5 and Intel's ICC
Marcus Holland-Moritz [Mon, 22 Sep 2003 22:52:40 +0000 (00:52 +0200)]
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net>
Message-ID: <00a101c3814b$76a8cc50$0c2f1fac@R2D2>

(the attribute part)

p4raw-id: //depot/perl@21326

ext/Devel/PPPort/PPPort.pm
perl.h

index 9793c68..d97832e 100644 (file)
@@ -103,7 +103,6 @@ even if available, access to a fixed interface):
     PERL_REVISION
     PERL_SUBVERSION
     PERL_UNUSED_DECL
-    PERL_UNUSED_DECL
     PERL_VERSION
     PL_compiling
     PL_copline
@@ -418,7 +417,7 @@ __DATA__
 #endif
 
 #ifdef HASATTRIBUTE
-#  if defined(__GNUC__) && defined(__cplusplus)
+#  if (defined(__GNUC__) && defined(__cplusplus)) || defined(__INTEL_COMPILER)
 #    define PERL_UNUSED_DECL
 #  else
 #    define PERL_UNUSED_DECL __attribute__((unused))
diff --git a/perl.h b/perl.h
index 73aad3c..ab6477c 100644 (file)
--- a/perl.h
+++ b/perl.h
 #endif
 
 #ifdef HASATTRIBUTE
-#  if defined(__GNUC__) && defined(__cplusplus)
+#  if (defined(__GNUC__) && defined(__cplusplus)) || defined(__INTEL_COMPILER)
 #    define PERL_UNUSED_DECL
 #  else
 #    define PERL_UNUSED_DECL __attribute__((unused))