Skip to content

Commit 08e8c9a

Browse files
committed
Fix test because of simplified code
Previously, we had an ASSIGN-KEY for Bag/Mix, now we just let the fact that there is no container, take care of throwing the error.
1 parent bb98a84 commit 08e8c9a

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

S32-basics/xxKEY.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -121,7 +121,7 @@ for $%h, Any, $%hi, Int, $%hia, Int -> \h, \T {
121121
X::Immutable, :method<DELETE-KEY>, :typename<Bag>, "\$b.DELETE-KEY";
122122
is $b.AT-KEY("a"), 1, "\$b.AT-KEY (after delete)";
123123
throws-like { $b.ASSIGN-KEY("a",42) },
124-
X::Assignment::RO, :typename<Bag>, "\$b.ASSIGN-KEY";
124+
X::Assignment::RO, :typename<Int>, "\$b.ASSIGN-KEY";
125125
is $b.AT-KEY("a"), 1, "\$b.AT-KEY (after assignment)";
126126
}
127127

@@ -152,7 +152,7 @@ for $%h, Any, $%hi, Int, $%hia, Int -> \h, \T {
152152
X::Immutable, :method<DELETE-KEY>, :typename<Mix>, "\$m.DELETE-KEY";
153153
is $m.AT-KEY("a"), 1, "\$m.AT-KEY (after delete)";
154154
throws-like { $m.ASSIGN-KEY("a",42) },
155-
X::Assignment::RO, :typename<Mix>, "\$m.ASSIGN-KEY";
155+
X::Assignment::RO, :typename<Int>, "\$m.ASSIGN-KEY";
156156
is $m.AT-KEY("a"), 1, "\$m.AT-KEY (after assignment)";
157157
}
158158

0 commit comments

Comments
 (0)