summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorMarcus Holland-Moritz <mhx-perl@gmx.net>2003-09-04 21:47:55 +0200
committerJarkko Hietaniemi <jhi@iki.fi>2003-09-04 17:26:48 +0000
commit29820b6def5e4bfae4384a0cdfde88a25199db29 (patch)
treedb6385224d1670792d3013422052371f74906ed8 /perl.h
parent784a4a22985b41b1cfd2d1268406269bdfabb591 (diff)
downloadperl-29820b6def5e4bfae4384a0cdfde88a25199db29.tar.gz
Re: "vendor" patch pickup
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net> Message-ID: <009b01c3730c$ac45e750$0c2f1fac@R2D2> (Gentoo: take Marcus' version of the __THROW patch and even further #ifdef-protect it with __GLIBC__.) p4raw-id: //depot/perl@21030
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h7
1 files changed, 6 insertions, 1 deletions
diff --git a/perl.h b/perl.h
index cd735afa6f..01458d9b65 100644
--- a/perl.h
+++ b/perl.h
@@ -713,9 +713,14 @@ int usleep(unsigned int);
#endif
/* sockatmark() is so new (2001) that many places might have it hidden
- * behind some -D_BLAH_BLAH_SOURCE guard. */
+ * behind some -D_BLAH_BLAH_SOURCE guard. The __THROW magic is required
+ * e.g. in Gentoo, see http://bugs.gentoo.org/show_bug.cgi?id=12605 */
#if defined(HAS_SOCKATMARK) && !defined(HAS_SOCKATMARK_PROTO)
+# if defined(__THROW) && defined(__GLIBC__)
+int sockatmark(int) __THROW;
+# else
int sockatmark(int);
+# endif
#endif
#ifdef SETERRNO