Skip Menu |
Report information
Id: 126961
Status: open
Priority: 0/
Queue: perl6

Owner: Nobody
Requestors: madcap.russo [at] gmail.com
Cc:
AdminCc:

Severity: (no value)
Tag: Bug
Platform: (no value)
Patch Status: (no value)
VM: (no value)



Subject: [BUG] ^= hangs system
Date: Fri, 18 Dec 2015 13:06:16 -0600
From: Jake Russo <madcap.russo [...] gmail.com>
To: rakudobug [...] perl.org
Download (untitled) / with headers
text/plain 317b
perl6 -e 'my $a = 10; $a ^= 2; say $a' hangs indefinitely. On irc, camelia outputs: rakudo-moar 71dadb: OUTPUT«Memory allocation failed; could not allocate 2210832 bytes␤» And my version: $ perl6 -v This is rakudo version 2015.11-419-gb7f0bcc built on MoarVM version 2015.11-34-gc3eea17 implementing Perl v6.b.
RT-Send-CC: perl6-compiler [...] perl.org
Download (untitled) / with headers
text/plain 725b
On Fri, 18 Dec 2015 11:06:44 -0800, madcap.russo@gmail.com wrote: Show quoted text
> perl6 -e 'my $a = 10; $a ^= 2; say $a' hangs indefinitely. > > On irc, camelia outputs: > rakudo-moar 71dadb: OUTPUT«Memory allocation failed; could not > allocate 2210832 bytes␤» > > And my version: > $ perl6 -v > This is rakudo version 2015.11-419-gb7f0bcc built on MoarVM version > 2015.11-34-gc3eea17 implementing Perl v6.b.
The hang is due to trying to output self-referential Junctions. Seems it needs the same `.gistseen` fix, like we have for Lists and Maps. $ perl6 -e 'my $a = 10; $a = one($a, 2); ' # doesn't hang $ perl6 -e 'my $a = 10; $a = one($a, 2); $a.perl' # hangs $ perl6 -e 'my $a = 10; $a = all($a, 2); $a.perl' # hangs


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

For issues related to this RT instance (aka "perlbug"), please contact perlbug-admin at perl.org