New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
.first on an infinite list generated with gather take is excruciatingly slow #3090
Comments
From @thundergnatmy @j := (0 .. *).list; returns 11 in .01 seconds on my system my @l := gather map {take $_ }, 0 .. *; returns 11 in 63.97 seconds on my system thundergnat: r: my @harshad := gather for 1 .. * { take $_ if $_ %% |
From @MouqOn Fri Mar 29 06:37:47 2013, thundergnat@comcast.net wrote:
FWIW, on my system with perl6 version "2015.02-275-g3da1bbd built on MoarVM version 2015.02-49-gb5b5435", I get about 8 seconds for: perl6 -e'my @l := gather map {take $_ }, 0 .. *; say @l.first: {$_ > 100000};' And about 1 second for: perl6 -e'my @j := (0 .. *).list; say @j.first: {$_ > 100000}' I'm thinking this is less outrageous. This should probably be added to perl6-bench or something to ensure we don't regress. Once we have some kind of test in place, I think this ticket can be resolved. ~Mouq |
The RT System itself - Status changed from 'new' to 'open' |
From @cokeOn Wed Mar 11 20:16:11 2015, Mouq wrote:
on my OSX box on nom: real 0m4.393s, and real 0m0.532s on glr, the first is now a syntax error: |
From @ninernine@sphinx:~/install/rakudo (nom=)> time perl6 -e'my $l := gather map {take $_ }, 0 .. *; say $l.first: {$_ > 100000};' real 0m2.170s real 0m0.757s Performance seems ok now post GLR? |
@niner - Status changed from 'open' to 'resolved' |
Migrated from rt.perl.org#117403 (status was 'resolved')
Searchable as RT117403$
The text was updated successfully, but these errors were encountered: