This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Avoid redundant copies in string evals
authorFather Chrysostomos <sprout@cpan.org>
Sun, 6 Nov 2011 22:04:51 +0000 (14:04 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 6 Nov 2011 22:23:49 +0000 (14:23 -0800)
commit0abcdfa4c5da571f9a31d50e4a121867868e8aaf
tree69628a02e27d839663e8073694d0c9a88a782905
parentbc344123285ead072c87437a15e486ff36fef609
Avoid redundant copies in string evals

Perl_lex_start copies the string passed to it unconditionally.
Sometimes pp_entereval makes a copy before passing the string
to lex_start.  So in those cases we can pass a flag to avoid a
redundant copy.
parser.h
pp_ctl.c
toke.c