utf8.c: Refactor to_uni_lower()

The portion that deals with Latin1 range characters is refactored into a
separate (static) function, so that it can be called from more than one place.

1 files changed, 3 insertions, 0 deletions

diff --git a/proto.h b/proto.h
index 6aa9e2da58..2b58991d26 100644
--- a/proto.h
+++ b/proto.h
@@ -7003,6 +7003,9 @@ STATIC SV*	S_swash_get(pTHX_ SV* swash, UV start, UV span)
 #define PERL_ARGS_ASSERT_SWASH_GET	\
 	assert(swash)
 
+STATIC U8	S_to_lower_latin1(pTHX_ const U8 c, U8 *p, STRLEN *lenp)
+			__attribute__warn_unused_result__;
+
 #endif
 #if defined(PERL_IN_UTIL_C)
 STATIC bool	S_ckwarn_common(pTHX_ U32 w);