Lines Matching refs:todo
11 $ONFAIL %todo %history $planned @FAILDETAIL) #private-ish
16 %todo = ();
50 BEGIN { plan tests => 14, todo => [3,4] }
61 ok(0); # ok, expected failure (see todo list, above)
129 =item C<todo =E<gt> [I<1,5,14>]>
165 elsif ($k eq 'todo' or
166 $k eq 'failok') { for (@$v) { $todo{$_}=1; }; }
173 my @todo = sort { $a <=> $b } keys %todo;
174 if (@todo) {
175 print $TESTOUT "1..$max todo ".join(' ', @todo).";\n";
371 my $todo = $todo{$ntest};
372 if ($todo and $ok) {
373 $context .= ' TODO?!' if $todo;
386 'result' => $result, 'todo' => $todo };
394 $context .= ' *TODO*' if $todo;