In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/1d07f51ccd6b218ad2158e1cf117585fc37d1f03?hp=e1817ab9e1b3103a20f0236757fcabee412a82f7>
- Log ----------------------------------------------------------------- commit 1d07f51ccd6b218ad2158e1cf117585fc37d1f03 Author: Lukas Mai <[email protected]> Date: Sat Oct 25 21:51:11 2014 +0200 unbreak threaded builds ----------------------------------------------------------------------- Summary of changes: ext/XS-APItest/APItest.xs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs index ccdc8d5..43a49e3 100644 --- a/ext/XS-APItest/APItest.xs +++ b/ext/XS-APItest/APItest.xs @@ -959,7 +959,8 @@ static OP *THX_parse_keyword_DEFSV(pTHX) return newDEFSVOP(); } -static void sv_cat_c(pTHX_ SV *sv, U32 c) { +#define sv_cat_c(a,b) THX_sv_cat_c(aTHX_ a, b) +static void THX_sv_cat_c(pTHX_ SV *sv, U32 c) { char ds[UTF8_MAXBYTES + 1], *d; d = (char *)uvchr_to_utf8((U8 *)ds, c); if (d - ds > 1) { -- Perl5 Master Repository
