In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/8276e333951d35e9f1f651314089b54c9a3762c4?hp=0b4678bf303b7fe204f4cf0bd124b1f9db5b13f0>

- Log -----------------------------------------------------------------
commit 8276e333951d35e9f1f651314089b54c9a3762c4
Author: Father Chrysostomos <spr...@cpan.org>
Date:   Sun Nov 26 16:33:09 2017 -0800

    toke.c: Don’t leak memory

-----------------------------------------------------------------------

Summary of changes:
 toke.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/toke.c b/toke.c
index ececc94314..a3d911b1c4 100644
--- a/toke.c
+++ b/toke.c
@@ -9331,6 +9331,7 @@ S_parse_ident(pTHX_ char **s, char **d, char * const e, 
int allow_package,
        char *d2;
         Newx(d, *s - olds + saw_tick + 2, char); /* +2 for $# */
         d2 = d;
+        SAVEFREEPV(d);
         Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
                          "Old package separator used in string");
         if (olds[-1] == '#')

-- 
Perl5 Master Repository

Reply via email to