In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/5016d3c45a66ce5b279c253e8a8c2a38a9bd8431?hp=323602af3a97d3d7bef451b6a9fabe0bc38921c2>
- Log ----------------------------------------------------------------- commit 5016d3c45a66ce5b279c253e8a8c2a38a9bd8431 Author: Tony Cook <[email protected]> Date: Tue Jul 30 14:41:56 2013 +1000 [perl #118525] make it work on threaded builds ----------------------------------------------------------------------- Summary of changes: ext/B/B.xs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ext/B/B.xs b/ext/B/B.xs index 85e53cc..9bafb38 100644 --- a/ext/B/B.xs +++ b/ext/B/B.xs @@ -1909,7 +1909,7 @@ GV(cv) GV *gv; CODE: gv = CvGV(cv); - ST(0) = gv ? make_sv_object((SV*)gv) : &PL_sv_undef; + ST(0) = gv ? make_sv_object(aTHX_ (SV*)gv) : &PL_sv_undef; #if PERL_VERSION > 17 -- Perl5 Master Repository
