Most often unused variables.

p4raw-id: //depot/perl@19785

1 files changed, 2 insertions, 0 deletions

diff --git a/perl.c b/perl.c
index 622d2de03f..a7024c1115 100644
--- a/perl.c
+++ b/perl.c
@@ -3518,8 +3518,10 @@ S_init_postdump_symbols(pTHX_ register int argc, register char **argv, register
     char *s;
     SV *sv;
     GV* tmpgv;
+#ifdef NEED_ENVIRON_DUP_FOR_MODIFY
     char **dup_env_base = 0;
     int dup_env_count = 0;
+#endif
 
     PL_toptarget = NEWSV(0,0);
     sv_upgrade(PL_toptarget, SVt_PVFM);