Skip to content

Commit

Permalink
Add test for RT #120620
Browse files Browse the repository at this point in the history
  • Loading branch information
usev6 committed Feb 7, 2015
1 parent 5cea494 commit 4eb80b2
Showing 1 changed file with 10 additions and 1 deletion.
11 changes: 10 additions & 1 deletion S32-list/map.t
@@ -1,6 +1,6 @@
use v6;
use Test;
plan 59;
plan 61;

# L<S32::Containers/"List"/"=item map">

Expand Down Expand Up @@ -253,4 +253,13 @@ is( ~((1..3).map: { dbl( $_ ) }),'2 4 6','extern method in map');
my @a = map &sprintf.assuming("%x"), 9..12;
is(@a, <9 a b c>, "map over a callable with a slurpy");
}

# RT #120620
{
is [foo => (1,2,3).map: {$_}].[0].value.join(":"), '1:2:3',
'map on list in array does not lose content';
is {foo => (1,2,3).map: {$_}}<foo>.join(":"), '1:2:3',
'map on list in hash does not lose content';
}

# vim: ft=perl6

0 comments on commit 4eb80b2

Please sign in to comment.