diff options
author | Craig A. Berry <craigberry@mac.com> | 2006-06-15 03:16:34 +0000 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2006-06-15 03:16:34 +0000 |
commit | 9b3749067821edd17024e783195e26d95f58fe9c (patch) | |
tree | d8ec52cb5f8852d75039dcbbd0e095bfac9a4178 | |
parent | 8e9a8a487e942a090c791d91c152037724ef47f4 (diff) | |
download | perl-9b3749067821edd17024e783195e26d95f58fe9c.tar.gz |
signedness nit in Unicode::Normalize::decompose
p4raw-id: //depot/perl@28395
-rw-r--r-- | ext/Unicode/Normalize/Normalize.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Unicode/Normalize/Normalize.xs b/ext/Unicode/Normalize/Normalize.xs index e48ead9e2d..3dea0f4746 100644 --- a/ext/Unicode/Normalize/Normalize.xs +++ b/ext/Unicode/Normalize/Normalize.xs @@ -465,7 +465,7 @@ decompose(src, compat = &PL_sv_no) dlen = slen; New(0, d, dlen+1, U8); dend = pv_utf8_decompose(s, slen, &d, dlen, SvTRUE(compat)); - sv_setpvn(dst, d, dend - d); + sv_setpvn(dst, (char *)d, dend - d); SvUTF8_on(dst); Safefree(d); RETVAL = dst; |