From 0f17be83fce99eb5b6085bedc02f3b1cb03846bb Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 9 Dec 2014 22:46:24 -0500
Subject: If no strtoul, the args are unused.

(strtoul is defined as not_here() if not found.)
---
 ext/POSIX/POSIX.xs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'ext/POSIX')

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 48caf9e0ae..490249e702 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -3155,6 +3155,8 @@ strtoul(str, base = 0)
 	unsigned long num;
 	char *unparsed;
     PPCODE:
+	PERL_UNUSED_VAR(str);
+	PERL_UNUSED_VAR(base);
 	num = strtoul(str, &unparsed, base);
 #if IVSIZE <= LONGSIZE
 	if (num > IV_MAX)
-- 
cgit v1.2.1