From dbb3849a8c02c652b48b25b770fc36b743b162db Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Fri, 1 Feb 2019 11:43:10 -0700 Subject: pp.c: Avoid use of unsafe function The function is unsafe because it doesn't check for running off the end of the buffer if presented with illegal UTF-8. The only remaining use now is from mathoms.c. --- invlist_inline.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'invlist_inline.h') diff --git a/invlist_inline.h b/invlist_inline.h index cd002cef19..1304b4543a 100644 --- a/invlist_inline.h +++ b/invlist_inline.h @@ -9,7 +9,7 @@ #ifndef PERL_INVLIST_INLINE_H_ #define PERL_INVLIST_INLINE_H_ -#if defined(PERL_IN_UTF8_C) || defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_TOKE_C) +#if defined(PERL_IN_UTF8_C) || defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_TOKE_C) || defined(PERL_IN_PP_C) /* An element is in an inversion list iff its index is even numbered: 0, 2, 4, * etc */ -- cgit v1.2.1