Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)'

On Mon, Jan 27, 2014 at 6:44 PM, Tony Cook via RT
<perlbug-followup@perl.org> wrote:
> One issue with both patches is deparsing:
>
> tony@mars:.../git/perl2$ ./perl -Ilib -MO=Deparse -e 'sub foo { my $x; my $y; 1 }'
> sub foo {
>     my($x, $y);
>     1;
> }
> -e syntax OK
>

I think I can do this by preserving the original optree on the side,
and pointing to it from the nulled out nexstate, in conjunction with
$B::overlay. Id have to copy the padops to preserve the pointers.

I welcome any other ideas though.

-- Matthew Horsfall (alh)

• [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Tony Cook via RT
• [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Matthew Horsfall
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage
• [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Tony Cook via RT
• [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Tony Cook via RT
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Zefram
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Father Chrysostomos
• [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Tony Cook via RT
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Father Chrysostomos
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Father Chrysostomos
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Zefram
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by Dave Mitchell
• Re: [perl #121077] [PATCH] Optimise 'my $x; my $y' into 'my ($x, $y)' by wolfsage