This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
toke.c:S_new_constant: Use NN SvREFCNT_inc in 2 places
authorFather Chrysostomos <sprout@cpan.org>
Sat, 8 Dec 2012 13:49:13 +0000 (05:49 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 9 Dec 2012 02:46:53 +0000 (18:46 -0800)
commitae5c22c148afc309380cbb328865a9fd64142cd9
treed9264c520a0c1ab5184ed3004a6f3ecc10f2a808
parent5f7f7af517bf32a891a7a891c738ddbe40051b53
toke.c:S_new_constant: Use NN SvREFCNT_inc in 2 places

The sv argument passed to new_constant is never null.  If the function
it calls is naughty enough to push a null on the stack, new_constant’s
callers will crash anyway.  So we can assume res is not null.

This eliminates needless null checks.
toke.c