This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
change 24967 got the #endif in the wrong place
authorDave Mitchell <davem@fdisolutions.com>
Thu, 23 Jun 2005 22:59:36 +0000 (22:59 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Thu, 23 Jun 2005 22:59:36 +0000 (22:59 +0000)
p4raw-id: //depot/perl@24968

pad.c

diff --git a/pad.c b/pad.c
index e1f7b69..de61002 100644 (file)
--- a/pad.c
+++ b/pad.c
@@ -1063,9 +1063,9 @@ Perl_pad_swipe(pTHX_ PADOFFSET po, bool refadjust)
     SvPADTMP_on(PL_curpad[po]);
 #else
     PL_curpad[po] = &PL_sv_undef;
+#endif
     if ((I32)po < PL_padix)
        PL_padix = po - 1;
-#endif
 }