From 757fc3292f5193d0ad3394e62e13f96058ccaca4 Mon Sep 17 00:00:00 2001
From: Pali <pali@cpan.org>
Date: Sat, 10 Feb 2018 13:41:46 +0100
Subject: Implement SvPVutf8_nomg and SvPVbyte_nomg

---
 mathoms.c | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'mathoms.c')

diff --git a/mathoms.c b/mathoms.c
index 6450291317..65bf267943 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -1769,6 +1769,22 @@ Perl_sv_utf8_downgrade(pTHX_ SV *const sv, const bool fail_ok)
     return sv_utf8_downgrade(sv, fail_ok);
 }
 
+char *
+Perl_sv_2pvutf8(pTHX_ SV *sv, STRLEN *const lp)
+{
+    PERL_ARGS_ASSERT_SV_2PVUTF8;
+
+    return sv_2pvutf8(sv, lp);
+}
+
+char *
+Perl_sv_2pvbyte(pTHX_ SV *sv, STRLEN *const lp)
+{
+    PERL_ARGS_ASSERT_SV_2PVBYTE;
+
+    return sv_2pvbyte(sv, lp);
+}
+
 #endif /* NO_MATHOMS */
 
 /*
-- 
cgit v1.2.1