summaryrefslogtreecommitdiff
path: root/mathoms.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2016-04-12 12:49:36 -0600
committerKarl Williamson <khw@cpan.org>2016-05-24 10:28:37 -0600
commit78d57975d5aa732ef6dfba842558183e8880539c (patch)
treef9d343b504c7e1b5c0b2895cb4ae8d831f8135f5 /mathoms.c
parenta4a439fb9cd74c575855119abb55dc091955bdf4 (diff)
downloadperl-78d57975d5aa732ef6dfba842558183e8880539c.tar.gz
mv function from locale.c to mathoms.c
The previous commit causes this function being moved to be just a wrapper not called in core. Just in case someone is calling it, it is retained, but moved to mathoms.c
Diffstat (limited to 'mathoms.c')
-rw-r--r--mathoms.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/mathoms.c b/mathoms.c
index cd2c1a48ea..82ee7784fb 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -1096,6 +1096,18 @@ Perl_sv_collxfrm(pTHX_ SV *const sv, STRLEN *const nxp)
{
return sv_collxfrm_flags(sv, nxp, SV_GMAGIC);
}
+
+char *
+Perl_mem_collxfrm(pTHX_ const char *input_string, STRLEN len, STRLEN *xlen)
+{
+ /* This function is retained for compatibility in case someone outside core
+ * is using this (but it is undocumented) */
+
+ PERL_ARGS_ASSERT_MEM_COLLXFRM;
+
+ return _mem_collxfrm(input_string, len, xlen, FALSE);
+}
+
#endif
bool