summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorAndy Dougherty <doughera@lafayette.edu>2006-07-10 09:16:27 -0400
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-07-11 07:55:21 +0000
commitd324fe495eb3277e76e453081ddf1dd3441dbd3e (patch)
tree16c399b38caeb8fa67ab628cb632e6356f2e0cc2 /perl.h
parentc6f5816709fd060d06981ce18c7569805a56bf50 (diff)
downloadperl-d324fe495eb3277e76e453081ddf1dd3441dbd3e.tar.gz
Re: [perl #39634] gcc 3.3 has problems with __attribute__((unused))
Message-ID: <Pine.LNX.4.62.0607101312540.24708@fractal.phys.lafayette.edu> p4raw-id: //depot/perl@28541
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl.h b/perl.h
index 9c32f969c4..94eb86085e 100644
--- a/perl.h
+++ b/perl.h
@@ -2604,9 +2604,11 @@ typedef struct clone_params CLONE_PARAMS;
# define HASATTRIBUTE_PURE
# endif
# if __GNUC__ == 3 && __GNUC_MINOR__ >= 4 || __GNUC__ > 3 /* 3.4 -> */
- /* This actually works for gcc-3.3, but not for g++-3.3. */
# define HASATTRIBUTE_UNUSED
# endif
+# if __GNUC__ == 3 && __GNUC_MINOR__ == 3 && !defined(__cplusplus)
+# define HASATTRIBUTE_UNUSED /* gcc-3.3, but not g++-3.3. */
+# endif
# if __GNUC__ == 3 && __GNUC_MINOR__ >= 4 || __GNUC__ > 3 /* 3.4 -> */
# define HASATTRIBUTE_WARN_UNUSED_RESULT
# endif