Add _mg() versions of the sv_setrv* family

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index 8ea0338..d91fa3c 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -696,7 +696,9 @@
 #define sv_setref_pvn(a,b,c,d) Perl_sv_setref_pvn(aTHX_ a,b,c,d)
 #define sv_setref_uv(a,b,c)    Perl_sv_setref_uv(aTHX_ a,b,c)
 #define sv_setrv_inc(a,b)      Perl_sv_setrv_inc(aTHX_ a,b)
+#define sv_setrv_inc_mg(a,b)   Perl_sv_setrv_inc_mg(aTHX_ a,b)
 #define sv_setrv_noinc(a,b)    Perl_sv_setrv_noinc(aTHX_ a,b)
+#define sv_setrv_noinc_mg(a,b) Perl_sv_setrv_noinc_mg(aTHX_ a,b)
 #define sv_setsv_flags(a,b,c)  Perl_sv_setsv_flags(aTHX_ a,b,c)
 #define sv_setsv_mg(a,b)       Perl_sv_setsv_mg(aTHX_ a,b)
 #define sv_setuv(a,b)          Perl_sv_setuv(aTHX_ a,b)