Searched refs:caught (Results 1 – 25 of 78) sorted by relevance
1234
| /mirbsd/src/gnu/usr.bin/perl/ext/Devel/PPPort/ |
| D | module3.c | 40 SV *caught = get_sv("Devel::PPPort::exception_caught", 0); in exception() local
48 sv_setiv(caught, 1); in exception()
52 sv_setiv(caught, 0); in exception()
|
| /mirbsd/src/gnu/usr.bin/perl/lib/Test/Simple/t/ |
| D | undef.t | 80 my $caught = tie *CATCH, 'TieOut';
86 is( $caught->read, "# undef\n" );
91 is( $caught->read, '' );
|
| D | extra.t | 27 my($out, $err) = Test::Simple::Catch::caught();
|
| D | extra_one.t | 16 my($out, $err) = Test::Simple::Catch::caught();
|
| D | fail_one.t | 16 my($out, $err) = Test::Simple::Catch::caught();
|
| D | fail.t | 16 my($out, $err) = Test::Simple::Catch::caught();
|
| D | harness_active.t | 16 my($out, $err) = Test::Simple::Catch::caught();
|
| D | skipall.t | 36 my($out, $err) = Test::Simple::Catch::caught();
|
| D | plan_is_noplan.t | 35 my($out, $err) = Test::Simple::Catch::caught();
|
| D | fail-more.t | 16 my($out, $err) = Test::Simple::Catch::caught();
|
| D | missing.t | 28 my($out, $err) = Test::Simple::Catch::caught();
|
| /mirbsd/src/sbin/dump/ |
| D | tape.c | 118 static volatile sig_atomic_t caught; /* have we caught the signal to proceed? */ variable
718 caught++; in proceed()
736 caught = 1; in enslave()
738 caught = 0; in enslave()
827 while (!caught) in doslave()
829 caught = 0; in doslave()
|
| /mirbsd/src/gnu/usr.bin/perl/t/lib/Test/Simple/sample_tests/ |
| D | too_few.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | too_few_fail.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | death.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | pre_plan_death.plx | 8 my($out, $err) = Test::Simple::Catch::caught();
|
| D | five_fail.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | success.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | two_fail.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | one_fail.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | death_in_eval.plx | 6 my($out, $err) = Test::Simple::Catch::caught();
|
| D | last_minute_death.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| D | extras.plx | 5 my($out, $err) = Test::Simple::Catch::caught();
|
| /mirbsd/src/gnu/usr.bin/perl/t/lib/Test/Simple/ |
| D | Catch.pm | 16 sub caught { return($out, $err) } subroutine
|
| /mirbsd/src/gnu/usr.bin/perl/lib/Tie/ |
| D | Scalar.t | 66 like( $warn, qr/WARNING: calling TieTest->new/, 'caught warning fine' );
|
1234