diff options
author | Chip Salzenberg <chip@atlantic.net> | 1996-12-31 09:52:01 +1200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-01-01 08:59:00 +1200 |
commit | 5618dfe8ec87ebafaf94fe40d18f7c2c4cdd1518 (patch) | |
tree | e2c1300c8c25ea9b10d1ea35897ccc3319813733 /perl.c | |
parent | 0c8c7a0553bc4fb5d18712a0ed968981d85f1767 (diff) | |
download | perl-5618dfe8ec87ebafaf94fe40d18f7c2c4cdd1518.tar.gz |
Fix core dump on perl_construct()/perl_destruct() loop
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -219,6 +219,11 @@ register PerlInterpreter *sv_interp; statgv = Nullgv; laststatval = -1; + sv_free((SV*)beginav); + beginav = Nullav; + sv_free((SV*)endav); + endav = Nullav; + /* Prepare to destruct main symbol table. */ hv = defstash; |