diff options
| author | Karl Williamson <khw@cpan.org> | 2019-02-01 11:43:10 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2019-02-04 21:00:50 -0700 |
| commit | dbb3849a8c02c652b48b25b770fc36b743b162db (patch) | |
| tree | b7177d1a50305df54c058ecac6acb2e721e715a1 /embed.fnc | |
| parent | 02601e33951e916a19e46272146a0b59862aaff5 (diff) | |
| download | perl-dbb3849a8c02c652b48b25b770fc36b743b162db.tar.gz | |
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.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1748,7 +1748,7 @@ EXp |SV* |_core_swash_init|NN const char* pkg|NN const char* name \ |NN SV* listsv|I32 minbits|I32 none \ |NULLOK SV* invlist|NULLOK U8* const flags_p #endif -#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_TOKE_C) || defined(PERL_IN_UTF8_C) +#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_TOKE_C) || defined(PERL_IN_UTF8_C) || defined(PERL_IN_PP_C) EiMRn |UV* |invlist_array |NN SV* const invlist EiMRn |bool |is_invlist |NN SV* const invlist EiMRn |bool* |get_invlist_offset_addr|NN SV* invlist |