This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
sv.h: document additional use of SVp_SCREAM flag
authorDavid Mitchell <davem@iabyn.com>
Fri, 12 Jun 2015 11:22:20 +0000 (12:22 +0100)
committerDavid Mitchell <davem@iabyn.com>
Fri, 12 Jun 2015 11:22:20 +0000 (12:22 +0100)
sv.h

diff --git a/sv.h b/sv.h
index 665c330..d0d8b65 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -365,6 +365,7 @@ perform the upgrade if necessary.  See C<svtype>.
 #define SVp_NOK                0x00002000  /* has valid non-public numeric value */
 #define SVp_POK                0x00004000  /* has valid non-public pointer value */
 #define SVp_SCREAM     0x00008000  /* method name is DOES */
+                                    /* eval cx text is ref counted */
 #define SVphv_CLONEABLE        SVp_SCREAM  /* PVHV (stashes) clone its objects */
 #define SVpgv_GP       SVp_SCREAM  /* GV has a valid GP */
 #define SVprv_PCS_IMPORTED  SVp_SCREAM  /* RV is a proxy for a constant