From e94c3f6a8d515b39961010524037ca044f029524 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Sat, 4 Aug 2018 08:28:51 -0600 Subject: mathoms.c: Use my_strnlen, not strnlen Spotted by H. Merijn Brand. --- mathoms.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'mathoms.c') diff --git a/mathoms.c b/mathoms.c index 59d8aeacf7..375e3e330f 100644 --- a/mathoms.c +++ b/mathoms.c @@ -1662,7 +1662,7 @@ Perl_is_utf8_char(const U8 *s) /* Assumes we have enough space, which is why this is deprecated. But the * strnlen() makes it safe for the common case of NUL-terminated strings */ - return isUTF8_CHAR(s, s + strnlen((char *) s, UTF8SKIP(s))); + return isUTF8_CHAR(s, s + my_strnlen((char *) s, UTF8SKIP(s))); } /* -- cgit v1.2.1