diff options
| author | Tony Cook <tony@develop-help.com> | 2013-01-22 22:37:34 +1100 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2013-01-25 13:54:12 +1100 |
| commit | f0af002c737e9413e85d737a29c8c9b396c13414 (patch) | |
| tree | c6bdfd2cc419761fecaa76b070746df030f9c28e /miniperlmain.c | |
| parent | f703fc96a75eab3db924e41a52531905784836de (diff) | |
| download | perl-f0af002c737e9413e85d737a29c8c9b396c13414.tar.gz | |
release the global struct *after* we've finished using it
Diffstat (limited to 'miniperlmain.c')
| -rw-r--r-- | miniperlmain.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/miniperlmain.c b/miniperlmain.c index 7f63a347d6..61358f7848 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -138,12 +138,12 @@ main(int argc, char **argv, char **env) environ = env; #endif + PERL_SYS_TERM(); + #ifdef PERL_GLOBAL_STRUCT free_global_struct(plvarsp); #endif /* PERL_GLOBAL_STRUCT */ - PERL_SYS_TERM(); - exit(exitstatus); return exitstatus; } |