summaryrefslogtreecommitdiff
path: root/mathoms.c
diff options
context:
space:
mode:
Diffstat (limited to 'mathoms.c')
-rw-r--r--mathoms.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/mathoms.c b/mathoms.c
index c74a38625a..92cd77a3c7 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -1145,7 +1145,7 @@ Perl_to_utf8_fold(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp)
{
PERL_ARGS_ASSERT_TO_UTF8_FOLD;
- return _to_utf8_fold_flags(p, ustrp, lenp, FOLD_FLAGS_FULL);
+ return toFOLD_utf8(p, ustrp, lenp);
}
UV
@@ -1153,7 +1153,7 @@ Perl_to_utf8_lower(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp)
{
PERL_ARGS_ASSERT_TO_UTF8_LOWER;
- return _to_utf8_lower_flags(p, ustrp, lenp, FALSE);
+ return toLOWER_utf8(p, ustrp, lenp);
}
UV
@@ -1161,7 +1161,7 @@ Perl_to_utf8_title(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp)
{
PERL_ARGS_ASSERT_TO_UTF8_TITLE;
- return _to_utf8_title_flags(p, ustrp, lenp, FALSE);
+ return toTITLE_utf8(p, ustrp, lenp);
}
UV
@@ -1169,7 +1169,7 @@ Perl_to_utf8_upper(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp)
{
PERL_ARGS_ASSERT_TO_UTF8_UPPER;
- return _to_utf8_upper_flags(p, ustrp, lenp, FALSE);
+ return toUPPER_utf8(p, ustrp, lenp);
}
SV *