1 files changed, 3 insertions, 0 deletions
diff --git a/taint.c b/taint.c
index 1bb292ab98..549d2ae9b7 100644
--- a/taint.c
+++ b/taint.c
@@ -26,6 +26,9 @@ Perl_taint_proper(pTHX_ const char *f, const char *const s)
 {
 #if defined(HAS_SETEUID) && defined(DEBUGGING)
     dVAR;
+
+    PERL_ARGS_ASSERT_TAINT_PROPER;
+
 #   if Uid_t_size == 1
     {
 	const UV  uid = PL_uid;