summaryrefslogtreecommitdiff
path: root/src/perl
diff options
context:
space:
mode:
authorailin-nemui <ailin-nemui@users.noreply.github.com>2015-11-24 00:08:20 +0100
committerailin-nemui <ailin-nemui@users.noreply.github.com>2015-12-10 00:52:33 +0100
commitff8ccaf08b60d88a67ddf810f8229f910f016cf7 (patch)
tree8d3e97cca2d679f04be14bc343a14ce7d4c77a28 /src/perl
parent4dc2bab4b4ae7ff05220c1121f0f11097f77b265 (diff)
downloadirssi-ff8ccaf08b60d88a67ddf810f8229f910f016cf7.zip
module check irssi version
Add explicit checks into every module to match the ABI version defined in common.h
Diffstat (limited to 'src/perl')
-rw-r--r--src/perl/perl-core.c5
-rw-r--r--src/perl/perl-fe.c5
2 files changed, 10 insertions, 0 deletions
diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c
index 793f9375..2f28c718 100644
--- a/src/perl/perl-core.c
+++ b/src/perl/perl-core.c
@@ -466,3 +466,8 @@ void perl_core_deinit(void)
signal_remove("script error", (SIGNAL_FUNC) sig_script_error);
PERL_SYS_TERM();
}
+
+void perl_core_abicheck(int *version)
+{
+ *version = IRSSI_ABI_VERSION;
+}
diff --git a/src/perl/perl-fe.c b/src/perl/perl-fe.c
index 2abc75c0..04305b63 100644
--- a/src/perl/perl-fe.c
+++ b/src/perl/perl-fe.c
@@ -278,3 +278,8 @@ void fe_perl_deinit(void)
perl_core_print_script_error(TRUE);
}
+
+void fe_perl_abicheck(int *version)
+{
+ *version = IRSSI_ABI_VERSION;
+}