utf8.c: Change name of static function

This changes only portions of the capitalization, and the new version is
more in keeping with other function names.

4 files changed, 5 insertions, 5 deletions

diff --git a/embed.fnc b/embed.fnc
index 1d7dfc5a2e..4a53b25d58 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -2484,7 +2484,7 @@ iTR	|int	|does_utf8_overflow|NN const U8 * const s		\
 				   |const bool consider_overlongs
 iTR	|int	|is_utf8_overlong_given_start_byte_ok|NN const U8 * const s \
 						     |const STRLEN len
-iTR	|int	|isFF_OVERLONG	|NN const U8 * const s|const STRLEN len
+iTR	|int	|isFF_overlong	|NN const U8 * const s|const STRLEN len
 SR	|char *	|unexpected_non_continuation_text			\
 		|NN const U8 * const s					\
 		|STRLEN print_len					\
diff --git a/embed.h b/embed.h
index e32b06076c..ee85c75abd 100644
--- a/embed.h
+++ b/embed.h
@@ -1989,7 +1989,7 @@
 #define _to_utf8_case(a,b,c,d,e,f,g,h,i)	S__to_utf8_case(aTHX_ a,b,c,d,e,f,g,h,i)
 #define check_locale_boundary_crossing(a,b,c,d)	S_check_locale_boundary_crossing(aTHX_ a,b,c,d)
 #define does_utf8_overflow	S_does_utf8_overflow
-#define isFF_OVERLONG		S_isFF_OVERLONG
+#define isFF_overlong		S_isFF_overlong
 #define is_utf8_common(a,b,c)	S_is_utf8_common(aTHX_ a,b,c)
 #define is_utf8_overlong_given_start_byte_ok	S_is_utf8_overlong_given_start_byte_ok
 #define new_msg_hv(a,b,c)	S_new_msg_hv(aTHX_ a,b,c)
diff --git a/proto.h b/proto.h
index 92c371a649..bb77d8307b 100644
--- a/proto.h
+++ b/proto.h
@@ -6633,7 +6633,7 @@ PERL_STATIC_INLINE int	S_does_utf8_overflow(const U8 * const s, const U8 * e, co
 #endif
 
 #ifndef PERL_NO_INLINE_FUNCTIONS
-PERL_STATIC_INLINE int	S_isFF_OVERLONG(const U8 * const s, const STRLEN len)
+PERL_STATIC_INLINE int	S_isFF_overlong(const U8 * const s, const STRLEN len)
 			__attribute__warn_unused_result__;
 #define PERL_ARGS_ASSERT_ISFF_OVERLONG	\
 	assert(s)
diff --git a/utf8.c b/utf8.c
index 3e4215b8a5..c7f3c58ade 100644
--- a/utf8.c
+++ b/utf8.c
@@ -754,11 +754,11 @@ S_is_utf8_overlong_given_start_byte_ok(const U8 * const s, const STRLEN len)
     }
 
     /* Check for the FF overlong */
-    return isFF_OVERLONG(s, len);
+    return isFF_overlong(s, len);
 }
 
 PERL_STATIC_INLINE int
-S_isFF_OVERLONG(const U8 * const s, const STRLEN len)
+S_isFF_overlong(const U8 * const s, const STRLEN len)
 {
     /* Returns an int indicating whether or not the UTF-8 sequence from 's' to
      * 'e' - 1 is an overlong beginning with \xFF.  It returns 1 if it is; 0 if