Lines Matching refs:self
187 my $self = shift;
189 print $fh $self->as_string, "\n"
194 my $is_plan = $self->is_plan;
195 my $tests_planned = $is_plan && $self->tests_planned;
196 my $is_test = $self->is_test;
197 my $is_ok = $is_test && $self->is_ok;
200 if ($self->is_unknown) {
205 if ($self->as_string =~ m/^$indent 1\.\.(\d+)/);
207 if ($self->as_string =~ m/^$indent(not )?ok /);
237 print "\n".$self->as_string
241 } elsif ($self->as_string ne "") {
243 $output_buffer .= "\n".$self->as_string;
251 my $self = shift;
254 if (scalar $self->failed > 0 && @failure_output) {
298 my $self = shift;
305 if ($self->{switches}) {
306 push @switches, $self->{switches};
308 if ($self->{lib}) {
309 foreach (@{$self->{lib}}) {
