X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=src%2Fperl.c;h=877bc00805cc0e5f78a09d2a03bc02ae0682e30d;hb=48b794525072b1ff00a90497ef0bb1f4030510f4;hp=96e85622445da09a7b9ad8deae514e215d279e6f;hpb=79e2f5ddc8bffe7ba604530b6090b5d7f7ec9bb1;p=collectd.git

diff --git a/src/perl.c b/src/perl.c
index 96e85622..877bc008 100644
--- a/src/perl.c
+++ b/src/perl.c
@@ -1364,6 +1364,11 @@ static int init_pi (int argc, char **argv)
 		exit (1);
 	}
 
+#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);
 
 	perl_threads = (c_ithread_list_t *)smalloc (sizeof (c_ithread_list_t));