From ec49a12ce17d116f4e9bda1c3d385aad560ec655 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Mon, 12 Jul 2010 11:16:41 +0100 Subject: Break S_utf8_mg_len_cache_update() out from Perl_sv_len_utf8(). --- proto.h | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'proto.h') diff --git a/proto.h b/proto.h index 535dc78c37..6fc11dd80a 100644 --- a/proto.h +++ b/proto.h @@ -5835,6 +5835,12 @@ STATIC STRLEN S_sv_pos_u2b_cached(pTHX_ SV *const sv, MAGIC **const mgp, const U #define PERL_ARGS_ASSERT_SV_POS_U2B_CACHED \ assert(sv); assert(mgp); assert(start); assert(send) +STATIC void S_utf8_mg_len_cache_update(pTHX_ SV *const sv, MAGIC **const mgp, const STRLEN ulen) + __attribute__nonnull__(pTHX_1) + __attribute__nonnull__(pTHX_2); +#define PERL_ARGS_ASSERT_UTF8_MG_LEN_CACHE_UPDATE \ + assert(sv); assert(mgp) + STATIC void S_utf8_mg_pos_cache_update(pTHX_ SV *const sv, MAGIC **const mgp, const STRLEN byte, const STRLEN utf8, const STRLEN blen) __attribute__nonnull__(pTHX_1) __attribute__nonnull__(pTHX_2); -- cgit v1.2.1