Move isUTF8_CHAR helper function, and reimplement it

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index 9213a5d..c9683ee 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -786,7 +786,7 @@
 #define my_popen(a,b)          Perl_my_popen(aTHX_ a,b)
 #endif
 #if !defined(PERL_NO_INLINE_FUNCTIONS)
-#define _is_utf8_char_slow     S__is_utf8_char_slow
+#define _is_utf8_char_slow     Perl__is_utf8_char_slow
 #define append_utf8_from_native_byte   S_append_utf8_from_native_byte
 #define av_top_index(a)                S_av_top_index(aTHX_ a)
 #define cx_popblock(a)         S_cx_popblock(aTHX_ a)