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: ae5c22c) | patch
Stop invalid charnames from leaking
authorFather Chrysostomos <sprout@cpan.org>
Sat, 8 Dec 2012 14:36:59 +0000 (06:36 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 9 Dec 2012 02:46:54 +0000 (18:46 -0800)
commitb6407c49d7cf6dff28149bbe7950b512b8ebd25d
treeac4b9fe7fafebe59f55a21c815702062cc16d6cctree | snapshot
parentae5c22c148afc309380cbb328865a9fd64142cd9commit | diff
Stop invalid charnames from leaking

The tests I added earlier were failing for a different reason than the
test names suggested.

Invalid charnames are not leaking because of the ‘too many errors’
that yyerror croakingly utters, but are leaking even when yyerror
doesn’t croak.

S_get_and_check_backslash_N_name just needs to free the returned SV
before returning if it is undefined.
t/op/svleak.t diff | blob | blame | history
toke.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.