Remove commented out declaration from S_validate_suid()

p4raw-id: //depot/perl@32996

diff --git a/perl.c b/perl.c
index d34f3e8..17a5eb0 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -3767,9 +3767,6 @@ S_validate_suid(pTHX_ const char *validarg, const char *scriptname,
                int fdscript, int suidscript, SV *linestr_sv, PerlIO *rsfp)
 {
     dVAR;
-#ifdef IAMSUID
-    /* int which; */
-#endif /* IAMSUID */
 
     /* do we need to emulate setuid on scripts? */