This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: c80d037) | patch
Free operand when encountering unmatched ')' in (?[])
authorFather Chrysostomos <sprout@cpan.org>
Thu, 6 Jun 2013 21:07:21 +0000 (14:07 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 7 Jun 2013 00:53:22 +0000 (17:53 -0700)
commit4bc5d08976b7df23b63a56cc017a20ac5766fbbc
tree8ac713b7297d8dd5201d55bb85905af7797838c9tree | snapshot
parentc80d037c54749655d40eac068936c5222ce9d8eecommit | diff
Free operand when encountering unmatched ')' in (?[])

I only need to free the operand (current), not the left-paren token
that turns out not to be a paren (lparen).

For lparen to leak, there would have to be two operands in a row on
the charclass parsing stack, which currently never happens.
regcomp.c diff | blob | blame | history
t/op/svleak.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.