diff options
| author | fukachan <fukachan> | 2002-04-14 08:20:37 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-04-14 08:20:37 +0000 |
| commit | 3403ab4f986f211ac0342778080ef21bae409e43 (patch) | |
| tree | 0ad5dbc52c620c0453ff86ec168e8b9f64e5cb22 /cpan/dist/Jcode/Unicode/Unicode.xs | |
| parent | b9cb387d093c2435a928bddb36d624ffb358cc69 (diff) | |
| download | fml8-Jcode-0-79.tar.gz fml8-Jcode-0-79.tar.bz2 fml8-Jcode-0-79.zip | |
Jcode-0.79Jcode-0-79
Diffstat (limited to 'cpan/dist/Jcode/Unicode/Unicode.xs')
| -rw-r--r-- | cpan/dist/Jcode/Unicode/Unicode.xs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/cpan/dist/Jcode/Unicode/Unicode.xs b/cpan/dist/Jcode/Unicode/Unicode.xs index 97c49ae8..7ed3fda1 100644 --- a/cpan/dist/Jcode/Unicode/Unicode.xs +++ b/cpan/dist/Jcode/Unicode/Unicode.xs @@ -29,7 +29,7 @@ euc_ucs2(src, ...) if (items > 1) { pedantic = SvIV(ST(1)); }; dstlen = srclen * 3 + 10; /* large enough? */ ST(0) = sv_2mortal(newSV(dstlen)); - dstlen = _euc_ucs2(SvPVX(ST(0)), s, pedantic); + dstlen = _euc_ucs2((unsigned char *)SvPVX(ST(0)), (unsigned char *)s, pedantic); SvCUR_set(ST(0), dstlen); SvPOK_only(ST(0)); if (SvROK(src)) { sv_setsv(SvRV(src), ST(0)); } @@ -46,7 +46,7 @@ ucs2_euc(src, ...) if (items > 1) { pedantic = SvIV(ST(1)); }; dstlen = srclen * 3 + 10; /* large enough? */ ST(0) = sv_2mortal(newSV(dstlen)); - dstlen = _ucs2_euc(SvPVX(ST(0)), s, srclen, pedantic); + dstlen = _ucs2_euc((unsigned char *)SvPVX(ST(0)), (unsigned char *)s, srclen, pedantic); SvCUR_set(ST(0), dstlen); SvPOK_only(ST(0)); if (SvROK(src)) { sv_setsv(SvRV(src), ST(0)); } @@ -61,7 +61,7 @@ utf8_ucs2(src, ...) char *s = SvROK(src) ? SvPV(SvRV(src), srclen) :SvPV(src, srclen); dstlen = srclen * 3 + 10; /* large enough? */ ST(0) = sv_2mortal(newSV(dstlen)); - dstlen = _utf8_ucs2(SvPVX(ST(0)), s); + dstlen = _utf8_ucs2((unsigned char *)SvPVX(ST(0)), (unsigned char *)s); SvCUR_set(ST(0), dstlen); SvPOK_only(ST(0)); if (SvROK(src)) { sv_setsv(SvRV(src), ST(0)); } @@ -76,7 +76,7 @@ ucs2_utf8(src, ...) char *s = SvROK(src) ? SvPV(SvRV(src), srclen) :SvPV(src, srclen); dstlen = srclen * 3 + 10; /* large enough? */ ST(0) = sv_2mortal(newSV(dstlen)); - dstlen = _ucs2_utf8(SvPVX(ST(0)), s, srclen); + dstlen = _ucs2_utf8((unsigned char *)SvPVX(ST(0)), (unsigned char *)s, srclen); SvCUR_set(ST(0), dstlen); SvPOK_only(ST(0)); if (SvROK(src)) { sv_setsv(SvRV(src), ST(0)); } |