Fix one BagHash test

Raku · Aug 28, 2015 · 1ea8920 · 1ea8920
1 parent 7e08156
commit 1ea8920
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/S02-types/baghash.t b/S02-types/baghash.t
@@ -130,8 +130,8 @@ sub showkv($x) {
 
 #?niecza skip "Unmatched key in Hash.LISTSTORE"
 {
-    throws-like { EVAL 'my %h = BagHash.new(<a b o p a p o o>)' },
-      X::Hash::Store::OddNumber;
+    my %h = BagHash.new(<a b o p a p o o>);
+    is %h, {:2a, :1b, :3o, :2p}, 'we now flatten according to single arg';
 }
 
 {