From 6129b56cf004af6d08fe0f9ce665d072c9695c6d Mon Sep 17 00:00:00 2001 From: David Leadbeater Date: Mon, 7 Mar 2011 18:56:50 +0000 Subject: [PATCH] Protect sv_collxfrm in mathoms.c with a USE_LOCALE_COLLATE ifdef It calls sv_collxfrm_flags which is only defined if USE_LOCALE_COLLATE is set. --- mathoms.c | 2 ++ 1 file changed, 2 insertions(+) diff --git a/mathoms.c b/mathoms.c index ceab0c5..0b67ae9 100644 --- a/mathoms.c +++ b/mathoms.c @@ -1120,11 +1120,13 @@ Perl_sv_eq(pTHX_ register SV *sv1, register SV *sv2) return sv_eq_flags(sv1, sv2, SV_GMAGIC); } +#ifdef USE_LOCALE_COLLATE char * Perl_sv_collxfrm(pTHX_ SV *const sv, STRLEN *const nxp) { return sv_collxfrm_flags(sv, nxp, SV_GMAGIC); } +#endif bool Perl_sv_2bool(pTHX_ register SV *const sv) -- 2.7.4