patch 7.4.1334
Problem: Many compiler warnings with MingW.
Solution: Add type casts. (Yasuhiro Matsumoto)
diff --git a/src/if_perl.xs b/src/if_perl.xs
index b723dcb..47c9440 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -49,6 +49,12 @@
# define __inline__ __inline
#endif
+#ifdef __GNUC__
+# pragma GCC diagnostic push
+# pragma GCC diagnostic ignored "-Wunused-variable"
+# pragma GCC diagnostic ignored "-Wmaybe-uninitialized"
+#endif
+
#include <EXTERN.h>
#include <perl.h>
#include <XSUB.h>
@@ -1730,3 +1736,6 @@
}
}
+#ifdef __GNUC__
+# pragma GCC diagnostic pop
+#endif