This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add PERL_NO_GET_CONTEXT to Sys::Hostname
authorNicholas Clark <nick@ccl4.org>
Sat, 19 Mar 2011 20:28:55 +0000 (20:28 +0000)
committerNicholas Clark <nick@ccl4.org>
Sat, 19 Mar 2011 21:18:19 +0000 (21:18 +0000)
For threaded platforms, this reduces the object code size, and should slightly
reduce CPU usage.

ext/Sys-Hostname/Hostname.xs

index 3ec72f7..6e974dd 100644 (file)
@@ -1,3 +1,5 @@
+#define PERL_NO_GET_CONTEXT
+
 #include "EXTERN.h"
 #include "perl.h"
 #include "XSUB.h"