The fix for this ticket also fixed
https://rt.perl.org/Public/Bug/Display.html?id=130366

However, we couldn't find any tests… are there any? If they, perhaps they also
cover 130366.

On 2017-05-01 14:31:19, elizabeth wrote:
> Fixed for the .values case with c1bd844e2752799af8e and
> 0e0ac2fb8c51a82a0 . But this needs a more thorough fix. To be
> forthcoming soon!
>
> > On 1 May 2017, at 19:28, Elizabeth Mattijsen (via RT) <perl6-bugs-
> > follo...@perl.org> wrote:
> >
> > # New Ticket Created by Elizabeth Mattijsen
> > # Please include the string: [perl #131241]
> > # in the subject line of all future correspondence about this issue.
> > # <URL: https://rt.perl.org/Ticket/Display.html?id=131241 >
> >
> >
> > <lizmat> m: my $b = <a b b c c c>.BagHash; $_ = 0 for $b.values;
> > dd $b
> > <camelia> rakudo-moar 1f80db: OUTPUT: «BagHash $b =
> > ("b"=>0,"a"=>0,"c"=>0).BagHash␤»
> > <lizmat> m: my $b = <a b b c c c>.BagHash; $_ = -1 for
> > $b.values; dd $b
> > <camelia> rakudo-moar 1f80db: OUTPUT: «BagHash $b = ("b"=>-
> > 1,"a"=>-1,"c"=>-1).BagHash␤»
> > <lizmat> m: my $b = <a b b c c c>.MixHash; $_ = 0 for $b.values;
> > dd $b
> > <camelia> rakudo-moar 1f80db: OUTPUT: «MixHash $b =
> > ("b"=>0,"a"=>0,"c"=>0).MixHash␤»
> >
> > All should empty out the BagHash/MixHash.

Reply via email to