Skip to content

Commit 298edbd

Browse files
committed
Fix fudging, it's # of lines, *NOT* number of tests, stupid! (that would be me)
1 parent 2a5f7c4 commit 298edbd

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

S32-hash/delete-adverb.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -67,10 +67,10 @@ sub gen_hash {
6767
is_deeply %h<d>:p:delete, (), "slice unexisting single pair out";
6868
is_deeply %h<d>:!p:delete, (d=>Any), "slice unexisting single pair out";
6969

70+
my $e= ("e", %h<e>);
7071
#?pugs 6 skip "no adverbials"
7172
#?niecza 6 todo "cannot combine adverbial pairs"
7273
#?rakudo 6 todo "cannot combine adverbial pairs"
73-
my $e= ("e", %h<e>);
7474
is_deeply %h<e>:kv:!delete, $e, "return a single key/value out";
7575
ok %h<e>:exists, "e should not have been deleted";
7676
is_deeply %h<e>:kv:delete, $e, "slice a single key/value out";
@@ -88,10 +88,10 @@ sub gen_hash {
8888
is_deeply %h<f>:k:delete, (), "slice unexisting single key";
8989
is %h<f>:!k:delete, 'f', "slice unexisting single key";
9090

91+
my $g= %h<g>;
9192
#?pugs 6 skip "no adverbials"
9293
#?niecza 6 todo "cannot combine adverbial pairs"
9394
#?rakudo 6 todo "cannot combine adverbial pairs"
94-
my $g= %h<g>;
9595
is %h<g>:v:!delete, $g, "return a single value out";
9696
ok %h<g>:exists, "g should not have been deleted";
9797
is %h<g>:v:delete, $g, "slice a single value out";

0 commit comments

Comments
 (0)