In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/776df701ccf6ff508b27293b35d3e65ccf922531?hp=c895a371d39dea7f20c053ad6dd1ef63feec4bcb>
- Log -----------------------------------------------------------------
commit 776df701ccf6ff508b27293b35d3e65ccf922531
Author: Tony Cook <t...@develop-help.com>
Date: Wed Sep 1 23:14:51 2010 +1000
PL_my_cxt_list is only available with PERL_IMPLICIT_CONTEXT
-----------------------------------------------------------------------
Summary of changes:
perl.c | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
diff --git a/perl.c b/perl.c
index 7e135ca..e0b9fa6 100644
--- a/perl.c
+++ b/perl.c
@@ -1071,9 +1071,11 @@ perl_destruct(pTHXx)
(long)cxstack_ix + 1);
}
+#ifdef PERL_IMPLICIT_CONTEXT
/* the entries in this list are allocated via SV PVX's, so get freed
* in sv_clean_all */
Safefree(PL_my_cxt_list);
+#endif
/* Now absolutely destruct everything, somehow or other, loops or no. */
--
Perl5 Master Repository
