perl plugin: Work around a compiler warning on FreeBSD.

On FreeBSD, PERL_SYS_INIT3 expands to some expression which triggers a "value
computed is not used" warning by gcc. By telling the compiler to ignore this
value, we can work around this issue. In the long run, this should imho be
fixed in Perl though.

Signed-off-by: Sebastian Harl <sh@tokkee.org>
Signed-off-by: Florian Forster <octo@huhu.verplant.org>

diff --git a/src/perl.c b/src/perl.c
index 028375780b406275df960dcdfaec1ebe44358646..68d6ddcff9e8b1cc1ca87b1f01798abf2bd4d6f7 100644 (file)
--- a/src/perl.c
+++ b/src/perl.c
@@ -817,6 +817,11 @@ static int init_pi (int argc, char **argv)
        }
 #endif /* COLLECT_DEBUG */
 
+#ifdef __FreeBSD__
+       /* On FreeBSD, PERL_SYS_INIT3 expands to some expression which
+        * triggers a "value computed is not used" warning by gcc. */
+       (void)
+#endif
        PERL_SYS_INIT3 (&argc, &argv, &environ);
 
        if (NULL == (perl = perl_alloc ())) {