diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-03-19 15:38:06 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-03-19 18:23:44 -0600 |
| commit | 4b88fb76efce8c436e63b907c9842345d4fa77c7 (patch) | |
| tree | 67d8be3146bf0c32e93bd8209c141ed72c5a0ae2 /ext | |
| parent | 27d6c58a7e12243bef66c58b38e7d1415d9ca07e (diff) | |
| download | perl-4b88fb76efce8c436e63b907c9842345d4fa77c7.tar.gz | |
Use the new utf8 to code point functions
These functions should be used in preference to the old ones which can
read beyond the end of the input string.
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/XS-APItest/APItest.pm | 2 | ||||
| -rw-r--r-- | ext/XS-APItest/APItest.xs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/XS-APItest/APItest.pm b/ext/XS-APItest/APItest.pm index 7e7e8defe5..78d77f1f87 100644 --- a/ext/XS-APItest/APItest.pm +++ b/ext/XS-APItest/APItest.pm @@ -5,7 +5,7 @@ use strict; use warnings; use Carp; -our $VERSION = '0.36'; +our $VERSION = '0.37'; require XSLoader; diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs index 6e8689c107..51059608b2 100644 --- a/ext/XS-APItest/APItest.xs +++ b/ext/XS-APItest/APItest.xs @@ -148,7 +148,7 @@ bitflip_key(pTHX_ IV action, SV *field) { const char *const end = p + len; while (p < end) { STRLEN len; - UV chr = utf8_to_uvuni((U8 *)p, &len); + UV chr = utf8_to_uvuni_buf((U8 *)p, (U8 *) end, &len); new_p = (char *)uvuni_to_utf8((U8 *)new_p, chr ^ 32); p += len; } |