Repository navigation
Perl 5.20 regression: Hang when compiling while(1) in a list #14165
Description
Activity
From @cpansprout
This hangs at compile time:
$ perl5.20.1 -e 'sub foo { () = ($a, my $b, ($c, do { while(1) {} })) }'
^CI found this by reading the source code. (C.f. commit 71a29c3
which fixed a similar bug long ago.)I’ll have a fix ready soon.
--
Father Chrysostomos
From @jkeenan
On Thu Oct 16 15:53:16 2014, sprout wrote:
This hangs at compile time:
$ perl5.20.1 -e 'sub foo { () = ($a, my $b, ($c, do { while(1) {} })) }'
^CI found this by reading the source code. (C.f. commit 71a29c3
which fixed a similar bug long ago.)I’ll have a fix ready soon.
Confirmed comparing 5.16.3 vs 5.20.1. Have you been able to bisect to determine the problematic commit?
Thank you very much.
Jim Keenan
--
James E Keenan (jkeenan@cpan.org)The RT System itself - Status changed from 'new' to 'open'
From @cpansprout
On Thu Oct 16 16:33:41 2014, jkeenan wrote:
On Thu Oct 16 15:53:16 2014, sprout wrote:
This hangs at compile time:
$ perl5.20.1 -e 'sub foo { () = ($a, my $b, ($c, do { while(1) {}
})) }'
^CI found this by reading the source code. (C.f. commit 71a29c3
which fixed a similar bug long ago.)I’ll have a fix ready soon.
Confirmed comparing 5.16.3 vs 5.20.1. Have you been able to bisect to
determine the problematic commit?It’s probably not necessary. The bad code was added by 7d3c8a6 according to git-blame.
I have just fixed it in 0d42e77, which should be backported to maint-5.20, IMO. (Please leave this ticket open till then.)
--
Father Chrysostomos
@steve-m-hay - Status changed from 'open' to 'pending release'
From @khwilliamson
Thanks for submitting this ticket
The issue should be resolved with the release today of Perl v5.22. If you find that the problem persists, feel free to reopen this ticket
--
Karl Williamson for the Perl 5 porters team@khwilliamson - Status changed from 'pending release' to 'resolved'
Migrated from rt.perl.org#122995 (status was 'resolved')
Searchable as RT122995$