From 8b72e93f4512de6d07e1e1286a5557eaa72e2448 Mon Sep 17 00:00:00 2001
From: ꦌꦫꦶꦏ꧀ꦦꦿꦧꦮꦑꦩꦭ꧀ <erik@darapsa.co.id>
Date: Tue, 16 Aug 2022 21:50:25 +0800
Subject: The typemaps so far are Perl only

---
 pikul.i | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/pikul.i b/pikul.i
index 748edae..507491a 100644
--- a/pikul.i
+++ b/pikul.i
@@ -3,6 +3,8 @@
 #include "pikul.h"
 %}
 
+#ifdef SWIGPERL
+
 %typemap(in) char *[] {
         AV *tempav = (AV *)SvRV($input);
         I32 len = av_len(tempav);
@@ -41,5 +43,7 @@
         free($1);
 }
 
+#endif
+
 %rename("%(strip:[pikul_])s") "";
 %include "pikul.h"
-- 
cgit v1.3