Skip to content

Commit

Permalink
Removed the $todo flag (was disabled anyway). If needed, we will add …
Browse files Browse the repository at this point in the history
…a '#?perl6: todo' marker

git-svn-id: http://svn.pugscode.org/pugs@19489 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information
cosimo committed Jan 15, 2008
1 parent 16b17b7 commit 85170f9
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions S29-str/split.t
Original file line number Diff line number Diff line change
Expand Up @@ -24,13 +24,13 @@ my %ords = (
9 => 'ninth',
);

sub split_test(@splitted, @expected, Str $desc, $todo = 0) {
sub split_test(@splitted, @expected, Str $desc) {
is +@splitted, +@expected,
"split created the correct value amount for: $desc", :todo($todo);
"split created the correct value amount for: $desc";
is @splitted[$_], @expected[$_],
"the %ords{$_ + 1} value matched for: $desc", :todo($todo)
for 0 .. @splitted.end;
is_deeply [~<< @splitted], [~<< @expected], "values match", :todo($todo);
"the %ords{$_ + 1} value matched for: $desc"
for 0 .. @splitted.end;
is_deeply [~<< @splitted], [~<< @expected], "values match";
}

is_deeply split("", "forty-two"),
Expand Down

0 comments on commit 85170f9

Please sign in to comment.