This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
pad.c: document cv_forget_slab
authorFather Chrysostomos <sprout@cpan.org>
Sun, 29 Jul 2012 20:01:27 +0000 (13:01 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 29 Jul 2012 20:01:27 +0000 (13:01 -0700)
pad.c

diff --git a/pad.c b/pad.c
index 0077e5b..352c5f9 100644 (file)
--- a/pad.c
+++ b/pad.c
@@ -486,6 +486,18 @@ Perl_cv_undef(pTHX_ CV *cv)
     CvFLAGS(cv) &= (CVf_WEAKOUTSIDE|CVf_CVGV_RC|CVf_ANON);
 }
 
     CvFLAGS(cv) &= (CVf_WEAKOUTSIDE|CVf_CVGV_RC|CVf_ANON);
 }
 
+/*
+=for apidoc cv_forget_slab
+
+When a CV has a reference count on its slab (CvSLABBED), it is responsible
+for making sure it is freed.  (Hence, no two CVs should ever have a
+reference count on the same slab.)  The CV only needs to reference the slab
+during compilation.  Once it is compiled and CvROOT attached, it has
+finished its job, so it can forget the slab.
+
+=cut
+*/
+
 void
 Perl_cv_forget_slab(pTHX_ CV *cv)
 {
 void
 Perl_cv_forget_slab(pTHX_ CV *cv)
 {