On Tue, 04 Jul 2017 14:52:31 -0700, alex.jakime...@gmail.com wrote: > 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.
The tests for 130366 covers part of this RT, The rest can be found in https://github.com/perl6/roast/commit/c2718dc4ece330bc3dd303089f4efd1d3d7f2b9d. Closing issue.
