* versions of Perl. For binary or source compatibility reasons, though,
* we cannot completely remove them from the core code.
*
+ * REMEMBER to update makedef.pl when adding a function to mathoms.c whose
+ * name doesn't begin with "Perl_".
+ *
* SMP - Oct. 24, 2005
*
* The compilation of this file can be suppressed; see INSTALL
NULL, 0));
}
-/* Functions after here were made mathoms post 5.10.0 but pre 5.8.9 */
-
AV *
Perl_newAV(pTHX)
{
return Perl_sv_mortalcopy_flags(aTHX_ oldstr, SV_GMAGIC);
}
+void
+Perl_sv_copypv(pTHX_ SV *const dsv, SV *const ssv)
+{
+ PERL_ARGS_ASSERT_SV_COPYPV;
+
+ sv_copypv_flags(dsv, ssv, 0);
+}
+
UV /* Made into a function, so can be deprecated */
NATIVE_TO_NEED(const UV enc, const UV ch)
{
return isUTF8_CHAR(s, s + UTF8SKIP(s));
}
+/*
+=for apidoc is_utf8_char_buf
+
+This is identical to the macro L</isUTF8_CHAR>.
+
+=cut */
+
+STRLEN
+Perl_is_utf8_char_buf(const U8 *buf, const U8* buf_end)
+{
+
+ PERL_ARGS_ASSERT_IS_UTF8_CHAR_BUF;
+
+ return isUTF8_CHAR(buf, buf_end);
+}
+
/* DEPRECATED!
* Like L</utf8_to_uvuni_buf>(), but should only be called when it is known that
* there are no malformations in the input UTF-8 string C<s>. Surrogates,