return ((CPerlObj*)pPerl)->Perl_utf8_to_uv(s, retlen);
}
+#undef Perl_utf8_to_uv_chk
+UV
+Perl_utf8_to_uv_chk(pTHXo_ U8 *s, I32* retlen, bool checking)
+{
+ return ((CPerlObj*)pPerl)->Perl_utf8_to_uv_chk(s, retlen, checking);
+}
+
#undef Perl_uv_to_utf8
U8*
Perl_uv_to_utf8(pTHXo_ U8 *d, UV uv)