Change 24750 by [EMAIL PROTECTED] on 2005/06/08 08:50:06

        Remove two more unused C<n_a>s

Affected files ...

... //depot/perl/pp_sys.c#413 edit

Differences ...

==== //depot/perl/pp_sys.c#413 (text) ====
Index: perl/pp_sys.c
--- perl/pp_sys.c#412~24748~    Wed Jun  8 01:07:05 2005
+++ perl/pp_sys.c       Wed Jun  8 01:50:06 2005
@@ -3011,7 +3011,6 @@
     STACKED_FTEST_CHECK;
 #ifdef PERL_EFF_ACCESS_R_OK
     if ((PL_op->op_private & OPpFT_ACCESS) && SvPOK(TOPs)) {
-       STRLEN n_a;
        result = PERL_EFF_ACCESS_R_OK(POPpx);
        if (result == 0)
            RETPUSHYES;
@@ -3039,7 +3038,6 @@
     STACKED_FTEST_CHECK;
 #ifdef PERL_EFF_ACCESS_W_OK
     if ((PL_op->op_private & OPpFT_ACCESS) && SvPOK(TOPs)) {
-       STRLEN n_a;
        result = PERL_EFF_ACCESS_W_OK(POPpx);
        if (result == 0)
            RETPUSHYES;
End of Patch.

Reply via email to