Make test less specific

Otherwise rakudo/rakudo#5213 will cause a failed test.
Raku · Feb 23, 2023 · c704932 · c704932
1 parent 504f026
commit c704932
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/S03-operators/context.t b/S03-operators/context.t
@@ -83,7 +83,7 @@ plan 38;
     throws-like '"@{$array}"', X::Obsolete, 'Perl form of "@{$array}" dies';
 
     my $hash  = {a => 1, b => 2, c => 3};
-    throws-like '%{$hash}', X::Hash::Store::OddNumber, 'Let rare Perl form of %{$hash} fail for other reasons';
+    dies-ok { %{$hash} }, 'Let rare Perl form of %{$hash} fail for other reasons';
 }
 
 is(($).WHAT.gist, '(Any)', 'Anonymous $ variable can be declared');