/macosx-10.9.5/CPANInternal-140/Test-Simple/t/Builder/ |
H A D | done_testing.t | 7 my $tb = Test::Builder->new; 8 $tb->level(0); 10 $tb->ok(1, "testing done_testing() with no arguments"); 11 $tb->ok(1, " another test so we're not testing just one"); 12 $tb->done_testing();
|
H A D | done_testing_with_no_plan.t | 7 my $tb = Test::Builder->new; 8 $tb->plan( "no_plan" ); 9 $tb->ok(1); 10 $tb->ok(1); 11 $tb->done_testing(2);
|
H A D | done_testing_with_number.t | 7 my $tb = Test::Builder->new; 8 $tb->level(0); 10 $tb->ok(1, "testing done_testing() with no arguments"); 11 $tb->ok(1, " another test so we're not testing just one"); 12 $tb->done_testing(2);
|
H A D | done_testing_with_plan.t | 7 my $tb = Test::Builder->new; 8 $tb->plan( tests => 2 ); 9 $tb->ok(1); 10 $tb->ok(1); 11 $tb->done_testing(2);
|
H A D | current_test_without_plan.t | 7 my $tb = Test::Builder->new; 8 $tb->current_test(2); 14 $tb->ok(1, "Third test"); 16 $tb->done_testing(3);
|
H A D | is_passing.t | 19 my $tb = Test::Builder::NoOutput->create; 20 ok $tb->is_passing, "a fresh TB object is passing"; 22 $tb->ok(1); 23 ok $tb->is_passing, " still passing after a test"; 25 $tb->ok(0); 26 ok !$tb->is_passing, " not passing after a failing test"; 28 $tb->ok(1); 29 ok !$tb->is_passing, " a passing test doesn't resurrect it"; 31 $tb->done_testing(3); 32 ok !$tb [all...] |
H A D | reset.t | 19 my $tb = Test::Builder->create; 23 $Original_Output{$_} = $tb->$_ for qw(output failure_output todo_output); 27 $tb->output(\$output); 28 $tb->failure_output(\$output); 29 $tb->todo_output(\$output); 31 $tb->plan(tests => 14); 32 $tb->level(0); 34 $tb->ok(1, "Running a test to alter TB's state"); 37 $tb->ok(0, "And a failure for fun"); 41 $tb [all...] |
H A D | done_testing_double.t | 17 my $tb = Test::Builder::NoOutput->create; 23 $tb->ok(1); 24 $tb->ok(1); 25 $tb->ok(1); 28 $tb->done_testing(3); 29 $tb->done_testing; 30 $tb->done_testing; 36 $Test->is_eq($tb->read, <<"END", "multiple done_testing");
|
H A D | done_testing_plan_mismatch.t | 19 my $tb = Test::Builder::NoOutput->create; 25 $tb->plan( tests => 3 ); 26 $tb->ok(1); 27 $tb->ok(1); 28 $tb->ok(1); 31 $tb->done_testing(2); 37 $Test->is_eq($tb->read, <<"END");
|
H A D | carp.t | 14 my $tb = Test::Builder->create; 15 sub foo { $tb->croak("foo") } 16 sub bar { $tb->carp("bar") } 21 eval { $tb->croak("this") };
|
H A D | no_plan_at_all.t | 23 my $tb = Test::Builder::NoOutput->create; 26 $tb->level(0); 27 $tb->ok(1, "just a test"); 28 $tb->ok(1, " and another"); 29 $tb->_ending; 32 $Test->is_eq($tb->read, <<'END', "proper behavior when no plan is seen");
|
H A D | reset_outputs.t | 17 my $tb = Test::Builder->create(); 25 $original_outputs{$method} = $tb->$method(); 26 $tb->$method($fh); 27 is $tb->$method(), $fh; 30 $tb->reset_outputs; 33 is $tb->$method(), $original_outputs{$method}, "reset_outputs() resets $method";
|
H A D | try.t | 18 my $tb = Test::Builder->new; 28 is $tb->_try(sub { 2 }), 2; 29 is $tb->_try(sub { return '' }), ''; 31 is $tb->_try(sub { die; }), undef; 33 is_deeply [$tb->_try(sub { die "Foo\n" })], [undef, "Foo\n"]; 40 $tb->_try(sub { die "Died\n" }, die_on_fail => 1);
|
H A D | output.t | 24 my $tb = Test::Builder->create(); 31 my $out = $tb->output($tmpfile); 49 my $out = $tb->output(\*FOO); 66 my $out = $tb->output(\$scalar); 76 my $out = $tb->output(\$scalar); 77 my $err = $tb->failure_output(\$scalar); 89 my $out = $tb->output(\$fakeout); 90 $tb->exported_to(__PACKAGE__); 91 $tb->no_ending(1); 92 $tb [all...] |
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/ |
H A D | note.t | 21 my $tb = Test::Builder::NoOutput->create; 23 $tb->note("foo"); 25 $tb->reset_outputs; 27 is $tb->read('out'), "# foo\n"; 28 is $tb->read('err'), '';
|
H A D | plan_bad.t | 13 my $tb = Test::Builder->create; 14 $tb->level(0); 16 ok !eval { $tb->plan( tests => 'no_plan' ); }; 21 ok !eval { $tb->plan( tests => @foo ) }; 24 ok !eval { $tb->plan( tests => 9.99 ) }; 28 ok !eval { $tb->plan( tests => -1 ) }; 32 ok !eval { $tb->plan( tests => '' ) }; 36 ok !eval { $tb->plan( 'wibble' ) };
|
H A D | no_plan.t | 15 my $tb = Test::Builder->create; 18 ok !eval { $tb->plan(tests => undef) }; 22 ok !eval { $tb->plan(tests => 0) }; 30 ok $tb->plan(no_plan => 1); 32 is $tb->has_plan, 'no_plan';
|
H A D | plan_is_noplan.t | 20 my $tb = Test::Builder::NoOutput->create; 22 $tb->plan('no_plan'); 24 $tb->ok(1, 'foo'); 25 $tb->_ending; 27 is($tb->read, <<OUT);
|
H A D | fail.t | 27 my $tb = Test::Builder::NoOutput->create; 28 $tb->plan( tests => 5 ); 31 $tb->ok( 1, 'passing' ); 32 $tb->ok( 2, 'passing still' ); 33 $tb->ok( 3, 'still passing' ); 34 $tb->ok( 0, 'oh no!' ); 35 $tb->ok( 0, 'damnit' ); 36 $tb->_ending; 38 $Test->is_eq($tb->read('out'), <<OUT); 47 $Test->is_eq($tb [all...] |
H A D | fail_one.t | 24 my $tb = Test::Builder::NoOutput->create; 26 $tb->plan( tests => 1 ); 29 $tb->ok(0); 30 $tb->_ending; 32 $Test->is_eq($tb->read('out'), <<OUT); 37 $Test->is_eq($tb->read('err'), <<ERR);
|
H A D | skipall.t | 23 my $tb = Test::More->builder; 24 $tb->output(\$out); 25 $tb->failure_output(\$err);
|
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/subtest/ |
H A D | args.t | 6 my $tb = Test::Builder->new; 8 $tb->ok( !eval { $tb->subtest() } ); 9 $tb->like( $@, qr/^\Qsubtest()'s second argument must be a code ref/ ); 11 $tb->ok( !eval { $tb->subtest("foo") } ); 12 $tb->like( $@, qr/^\Qsubtest()'s second argument must be a code ref/ ); 14 $tb->done_testing();
|
H A D | basic.t | 24 my $tb = Test::Builder::NoOutput->create; 26 $tb->plan( tests => 7 ); 28 $tb->ok( $_, "We're on $_" ); 29 $tb->diag("We ran $_"); 32 my $indented = $tb->child; 40 $tb->ok( $_, "We're on $_" ); 43 $tb->reset_outputs; 44 is $tb->read, <<"END", 'Output should nest properly'; 63 my $tb = Test::Builder::NoOutput->create; 65 $tb [all...] |
H A D | die.t | 14 my $tb = Test::Builder::NoOutput->create; 16 $tb->ok(1); 19 $tb->subtest("death" => sub { 26 $Test->ok( !$tb->parent, "the parent object is restored after a die" );
|
/macosx-10.9.5/ruby-104/ruby/test/rinda/ |
H A D | test_tuplebag.rb | 7 @tb = Rinda::TupleBag.new 12 val = @tb.delete tup(:val, 1) 17 @tb.push t 19 val = @tb.delete t 23 assert_equal [], @tb.find_all(tem(:val, 1)) 27 @tb.push t1 28 @tb.push t2 30 val = @tb.delete t1 34 assert_equal [t2], @tb.find_all(tem(:val, 1)) 38 assert_equal [], @tb [all...] |