Change 33002: Don't create local variables validarg and fdscript if they aren't going

[Nicholas Clark]

Change 33002 by [EMAIL PROTECTED] on 2008/01/18 16:11:35

        Don't create local variables validarg and fdscript if they aren't going
        to be used.

Affected files ...

... //depot/perl/perl.c#855 edit

Differences ...

==== //depot/perl/perl.c#855 (text) ====
Index: perl/perl.c
--- perl/perl.c#854~33001~      2008-01-18 07:28:09.000000000 -0800
+++ perl/perl.c 2008-01-18 08:11:35.000000000 -0800
@@ -1677,7 +1677,9 @@
     char **argv = PL_origargv;
     const char *scriptname = NULL;
     VOL bool dosearch = FALSE;
+#ifdef DOSUID
     const char *validarg = "";
+#endif
     register SV *sv;
     register char c;
     const char *cddir = NULL;
@@ -2031,8 +2033,11 @@
 
     {
        bool suidscript = FALSE;
-       const int fdscript
-           = open_script(scriptname, dosearch, &suidscript, &rsfp);
+
+#ifdef DOSUID
+       const int fdscript =
+#endif
+           open_script(scriptname, dosearch, &suidscript, &rsfp);
 
        validate_suid(validarg, scriptname, fdscript, suidscript,
                linestr_sv, rsfp);
End of Patch.