perlapi: Document SvAMAGIC_(on|off)

1 files changed, 17 insertions, 0 deletions

diff --git a/inline.h b/inline.h
index a884472663..436f8eb3ac 100644
--- a/inline.h
+++ b/inline.h
@@ -419,6 +419,14 @@ Perl_SvREFCNT_dec_NN(pTHX_ SV *sv)
         Perl_sv_free2(aTHX_ sv, rc);
 }
 
+/*
+=for apidoc SvAMAGIC_on
+
+Indicate that C<sv> has overloading (active magic) enabled.
+
+=cut
+*/
+
 PERL_STATIC_INLINE void
 Perl_SvAMAGIC_on(SV *sv)
 {
@@ -427,6 +435,15 @@ Perl_SvAMAGIC_on(SV *sv)
 
     if (SvOBJECT(SvRV(sv))) HvAMAGIC_on(SvSTASH(SvRV(sv)));
 }
+
+/*
+=for apidoc SvAMAGIC_off
+
+Indicate that C<sv> has overloading (active magic) disabled.
+
+=cut
+*/
+
 PERL_STATIC_INLINE void
 Perl_SvAMAGIC_off(SV *sv)
 {