This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate:
authorNicholas Clark <nick@ccl4.org>
Thu, 23 Oct 2003 20:44:09 +0000 (20:44 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 23 Oct 2003 20:44:09 +0000 (20:44 +0000)
[ 21527]
Fix two threads::shared leaks
#24061 - AV in shared interpreter wasn't set to AvREAL
#24255 - mortals were added to the shared interpreter's tmpstack
and never freed.

[oops. Also sucked in a typo correction in blead]
p4raw-link: @21527 on //depot/perl: aa49c2f8cdfe618e292a459ac4668178f67243bd

p4raw-id: //depot/perl@21530
p4raw-edited: from //depot/maint-5.8/perl@21528 'copy'
ext/threads/shared/shared.xs (@21330..)

ext/threads/shared/shared.xs

index 52f54be..4bf4c78 100644 (file)
@@ -440,7 +440,7 @@ sharedsv_scalar_store(pTHX_ SV *sv, shared_sv *shared)
            SHARED_CONTEXT;
            /* #24255: sv_setsv() (via sv_unref_flags()) may cause a
             * deferred free with sv_2mortal(). Ensure that the free_tmps
-            * is done within this inpterpreter. DAPM.
+            * is done within this interpreter. DAPM.
             */
            ENTER;
            SAVETMPS;