diff options
| author | David Leadbeater <dgl@dgl.cx> | 2014-06-24 20:20:27 +0100 |
|---|---|---|
| committer | David Leadbeater <dgl@dgl.cx> | 2014-06-24 20:20:27 +0100 |
| commit | 43df6e424e468bd16da076bf01c848b89a7dbf60 (patch) | |
| tree | 4502ac50dd30f1829c99ecc11211f7f343ca1020 /src/perl/irc | |
| parent | c26a634fe6f65f44cdd036d2657fe4335ed6e309 (diff) | |
| download | irssi-43df6e424e468bd16da076bf01c848b89a7dbf60.zip | |
Define PERL_NO_GET_CONTEXT in all perl source files
This removes the calls to Perl_get_context() that get automatically
added to XS code for ancient source code compatibility reasons.
The result is about a ~60K size reduction in the binary (based on
comparing two 64-bit stripped irssi binaries compiled
--with-perl-staticlib).
Diffstat (limited to 'src/perl/irc')
| -rw-r--r-- | src/perl/irc/Channel.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Client.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Ctcp.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Dcc.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Irc.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Modes.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Netsplit.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Notifylist.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Query.xs | 1 | ||||
| -rw-r--r-- | src/perl/irc/Server.xs | 1 |
10 files changed, 10 insertions, 0 deletions
diff --git a/src/perl/irc/Channel.xs b/src/perl/irc/Channel.xs index 828e8cca..782fa1d5 100644 --- a/src/perl/irc/Channel.xs +++ b/src/perl/irc/Channel.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Channel PACKAGE = Irssi::Irc PREFIX = irc_ diff --git a/src/perl/irc/Client.xs b/src/perl/irc/Client.xs index 8481a11e..05616af2 100644 --- a/src/perl/irc/Client.xs +++ b/src/perl/irc/Client.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Client PACKAGE = Irssi::Irc diff --git a/src/perl/irc/Ctcp.xs b/src/perl/irc/Ctcp.xs index f298a2a4..d1bf8ba4 100644 --- a/src/perl/irc/Ctcp.xs +++ b/src/perl/irc/Ctcp.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" #include "ctcp.h" diff --git a/src/perl/irc/Dcc.xs b/src/perl/irc/Dcc.xs index eff4e982..c078a1b5 100644 --- a/src/perl/irc/Dcc.xs +++ b/src/perl/irc/Dcc.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Dcc PACKAGE = Irssi::Irc diff --git a/src/perl/irc/Irc.xs b/src/perl/irc/Irc.xs index 251efb8b..22a87384 100644 --- a/src/perl/irc/Irc.xs +++ b/src/perl/irc/Irc.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" static int initialized = FALSE; diff --git a/src/perl/irc/Modes.xs b/src/perl/irc/Modes.xs index 4f355ce0..a53391b3 100644 --- a/src/perl/irc/Modes.xs +++ b/src/perl/irc/Modes.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Modes PACKAGE = Irssi::Irc diff --git a/src/perl/irc/Netsplit.xs b/src/perl/irc/Netsplit.xs index b0b1e523..9fafaf74 100644 --- a/src/perl/irc/Netsplit.xs +++ b/src/perl/irc/Netsplit.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Netsplit PACKAGE = Irssi::Irc::Server diff --git a/src/perl/irc/Notifylist.xs b/src/perl/irc/Notifylist.xs index 192489cc..74747baa 100644 --- a/src/perl/irc/Notifylist.xs +++ b/src/perl/irc/Notifylist.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Notifylist PACKAGE = Irssi::Irc diff --git a/src/perl/irc/Query.xs b/src/perl/irc/Query.xs index a4f6bd03..e873d9a5 100644 --- a/src/perl/irc/Query.xs +++ b/src/perl/irc/Query.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" MODULE = Irssi::Irc::Query PACKAGE = Irssi::Irc::Server PREFIX = irc_ diff --git a/src/perl/irc/Server.xs b/src/perl/irc/Server.xs index a330fb20..4fe0d6b5 100644 --- a/src/perl/irc/Server.xs +++ b/src/perl/irc/Server.xs @@ -1,3 +1,4 @@ +#define PERL_NO_GET_CONTEXT #include "module.h" static GSList *register_hash2list(HV *hv) |