In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/7acf604d4a195220d15ef235b9ed4b3be17f6f92?hp=31775478b5d0b13861042933fc993c5f57c69f5a>

- Log -----------------------------------------------------------------
commit 7acf604d4a195220d15ef235b9ed4b3be17f6f92
Author: Lukas Mai <[email protected]>
Date:   Wed Oct 19 15:17:04 2016 +0200

    regcomp.c: remove extra aTHX_ added in c2867e745ca
-----------------------------------------------------------------------

Summary of changes:
 regcomp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/regcomp.c b/regcomp.c
index 97f601e..79c6d5f 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -18931,7 +18931,7 @@ Perl_regprop(pTHX_ const regexp *prog, SV *sv, const 
regnode *o, const regmatch_
         Perl_sv_catpvf(aTHX_ sv, "-%s",PL_reg_name[o->flags]);
         DEBUG_TRIE_COMPILE_r({
           if (trie->jump)
-            sv_catpvs(aTHX_ sv, "(JUMP)");
+            sv_catpvs(sv, "(JUMP)");
           Perl_sv_catpvf(aTHX_ sv,
             "<S:%"UVuf"/%"IVdf" W:%"UVuf" L:%"UVuf"/%"UVuf" 
C:%"UVuf"/%"UVuf">",
             (UV)trie->startstate,

--
Perl5 Master Repository

Reply via email to