[DOCPATCH] Re: [PATCH] Re: [perl #21614] 5.8.0 Unbalanced string table refcount

Message-ID: <20030327223735.GD277@Bagpuss.unfortu.net>

p4raw-id: //depot/perl@19079

1 files changed, 8 insertions, 0 deletions

diff --git a/sv.h b/sv.h
index 18ad29705e..8af8cbbba5 100644
--- a/sv.h
+++ b/sv.h
@@ -920,6 +920,14 @@ Like C<SvPV>, but converts sv to byte representation first if necessary.
 Guarantees to evaluate sv only once; use the more efficient C<SvPVbyte>
 otherwise.
 
+=for apidoc Am|bool|SvIsCOW|SV* sv
+Returns a boolean indicating whether the SV is Copy-On-Write. (either shared
+hash key scalars, or full Copy On Write scalars if 5.9.0 is configured for
+COW)
+
+=for apidoc Am|bool|SvIsCOW_shared_hash|SV* sv
+Returns a boolean indicating whether the SV is Copy-On-Write shared hash key
+scalar.
 
 =cut
 */