X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/cd86ed9d430a95bb9cf370c699245e1b667c146d..04496198214913b8ff4a9d2e5204c2910ee494e0:/miniperlmain.c diff --git a/miniperlmain.c b/miniperlmain.c index 39f8f19..59d79b0 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -74,7 +74,9 @@ main(int argc, char **argv, char **env) my_vars = my_plvarsp = plvarsp; # endif #endif /* PERL_GLOBAL_STRUCT */ - (void)env; +#ifndef NO_ENV_ARRAY_IN_MAIN + PERL_UNUSED_ARG(env); +#endif #ifndef PERL_USE_SAFE_PUTENV PL_use_safe_putenv = 0; #endif /* PERL_USE_SAFE_PUTENV */