This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix embed.fnc for utf8_to_uvchr_buf
[perl5.git] / utf8.c
diff --git a/utf8.c b/utf8.c
index 77e16f3..c523f32 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -1748,6 +1748,8 @@ Also implemented as a macro in utf8.h
 UV
 Perl_utf8_to_uvchr_buf(pTHX_ const U8 *s, const U8 *send, STRLEN *retlen)
 {
+    PERL_ARGS_ASSERT_UTF8_TO_UVCHR_BUF;
+
     assert(s < send);
 
     return utf8n_to_uvchr(s, send - s, retlen,