Home
last modified time | relevance | path

Searched refs:Test2 (Results 1 – 25 of 198) sorted by relevance

12345678

/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/behavior/
Dno_load_api.t9 # This test is to insure certain objects do not load Test2::API directly or #
10 # indirectly when being required. It is ok for import() to load Test2::API if #
15 require Test2::Formatter;
16 require Test2::Formatter::TAP;
18 require Test2::Event;
19 require Test2::Event::Bail;
20 require Test2::Event::Diag;
21 require Test2::Event::Exception;
22 require Test2::Event::Note;
23 require Test2::Event::Ok;
[all …]
Dtrace_signature.t4 use Test2::Tools::Tiny;
5 use Test2::API qw/intercept context/;
6 use Test2::Util qw/get_tid/;
29 my $trace = Test2::EventFacet::Trace->new(frame => ['main', 'foo.t', 42, 'xxx']);
36 my $e = Test2::Event::Ok->new(pass => 1);
39 $e = Test2::Event::Ok->new(pass => 1, trace => Test2::EventFacet::Trace->new(frame => ['', '', '', …
42 $e = Test2::Event::Ok->new(pass => 1, trace => Test2::EventFacet::Trace->new(frame => []));
Ddisable_ipc_a.t4 no Test2::IPC;
5 use Test2::Tools::Tiny;
6 use Test2::IPC::Driver::Files;
8 ok(Test2::API::test2_ipc_disabled, "disabled IPC");
9 ok(!Test2::API::test2_ipc, "No IPC");
/openbsd/src/gnu/usr.bin/perl/
DMakefile.bsd-wrapper1699 Test2 3p lib/Test2.pm \
700 Test2::API 3p lib/Test2/API.pm \
701 Test2::API::Breakage 3p lib/Test2/API/Breakage.pm \
702 Test2::API::Context 3p lib/Test2/API/Context.pm \
703 Test2::API::Instance 3p lib/Test2/API/Instance.pm \
704 Test2::API::InterceptResult 3p lib/Test2/API/InterceptResult.pm \
705 Test2::API::InterceptResult::Event 3p lib/Test2/API/InterceptResult/Event.pm \
706 Test2::API::InterceptResult::Hub 3p lib/Test2/API/InterceptResult/Hub.pm \
707 Test2::API::InterceptResult::Squasher 3p lib/Test2/API/InterceptResult/Squasher.pm \
708 Test2::API::Stack 3p lib/Test2/API/Stack.pm \
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/
DEvent.t3 use Test2::Tools::Tiny;
5 use Test2::Event();
6 use Test2::EventFacet::Trace();
7 use Test2::Event::Generic;
9 use Test2::API qw/context/;
16 use base 'Test2::Event';
17 use Test2::Util::HashBase qw/foo bar baz/;
46 …my $e = Test2::Event->new(trace => Test2::EventFacet::Trace->new(frame => ['foo', 'foo.pl', 42], n…
61 …like($warnings->[0], qr/Use of Test2::Event->nested\(\) is deprecated/, "Warned about deprecation"…
62 …like($warnings->[1], qr/Use of Test2::Event->in_subtest\(\) is deprecated/, "Warned about deprecat…
[all …]
DAPI.t6 use Test2::API qw/context/;
10 $INIT = Test2::API::test2_init_done;
11 $LOADED = Test2::API::test2_load_done;
14 use Test2::IPC;
15 use Test2::Tools::Tiny;
16 use Test2::Util qw/get_tid/;
17 my $CLASS = 'Test2::API';
20 ok(Test2::API->can($_), "$_ method is present") for qw{
59 ok(Test2::API::test2_load_done, "We loaded it");
75 Test2::API::test2_add_callback_exit(
[all …]
DHub.t4 use Test2::IPC;
5 use Test2::Tools::Tiny;
6 use Test2::API qw/context test2_ipc_drivers/;
7 use Test2::Util qw/CAN_FORK CAN_THREAD CAN_REALLY_FORK/;
25 use base 'Test2::Event';
26 use Test2::Util::HashBase qw{msg};
30 my $hub = Test2::Hub->new(
36 …my $e = My::Event->new(msg => $msg, trace => Test2::EventFacet::Trace->new(frame => ['fake', 'fake…
55 my $hub = Test2::Hub->new;
58 my $trace = Test2::EventFacet::Trace->new(
[all …]
DIPC.t4 use Test2::IPC qw/cull/;
5 use Test2::API qw/context test2_ipc_drivers test2_ipc intercept/;
7 use Test2::Tools::Tiny;
13 ['Test2::IPC::Driver::Files'],
19 ok(eval { intercept { Test2::IPC->import }; 1 }, "Can re-import Test2::IPC without error") or diag …
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/Util/
DHashBase.pm1 package Test2::Util::HashBase;
19 $Test2::Util::HashBase::HB_VERSION = '0.009';
20 *Test2::Util::HashBase::ATTR_SUBS = \%Object::HashBase::ATTR_SUBS;
21 *Test2::Util::HashBase::ATTR_LIST = \%Object::HashBase::ATTR_LIST;
22 *Test2::Util::HashBase::VERSION = \%Object::HashBase::VERSION;
23 *Test2::Util::HashBase::CAN_CACHE = \%Object::HashBase::CAN_CACHE;
60 my $ver = $Test2::Util::HashBase::HB_VERSION || $Test2::Util::HashBase::VERSION;
61 …$Test2::Util::HashBase::VERSION{$into} = $ver if !$Test2::Util::HashBase::VERSION{$into} || $Test2…
64 my $attr_list = $Test2::Util::HashBase::ATTR_LIST{$into} ||= [];
65 my $attr_subs = $Test2::Util::HashBase::ATTR_SUBS{$into} ||= {};
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/Event/
DPlan.t4 use Test2::Tools::Tiny;
5 use Test2::Event::Plan;
6 use Test2::EventFacet::Trace;
8 my $plan = Test2::Event::Plan->new(
9 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
36 $plan = Test2::Event::Plan->new(
37 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
43 $plan = Test2::Event::Plan->new(
44 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
53 $plan = Test2::Event::Plan->new(
[all …]
DNote.t4 use Test2::Tools::Tiny;
5 use Test2::Event::Note;
6 use Test2::EventFacet::Trace;
8 my $note = Test2::Event::Note->new(
9 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
15 $note = Test2::Event::Note->new(
16 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
23 $note = Test2::Event::Note->new(
24 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
30 $note = Test2::Event::Note->new(
[all …]
DDiag.t3 use Test2::Tools::Tiny;
4 use Test2::Event::Diag;
5 use Test2::EventFacet::Trace;
7 my $diag = Test2::Event::Diag->new(
8 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
14 $diag = Test2::Event::Diag->new(
15 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
22 $diag = Test2::Event::Diag->new(
23 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
31 $diag = Test2::Event::Diag->new(
[all …]
DSubtest.t4 use Test2::Tools::Tiny;
5 use Test2::Event::Subtest;
6 my $st = 'Test2::Event::Subtest';
8 my $trace = Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__, 'xxx']);
17 ok($one->isa('Test2::Event::Ok'), "Inherit from Ok");
30 require Test2::Event::Pass;
31 push @{$one->subevents} => Test2::Event::Pass->new(name => 'xxx');
45 package => 'Test2::Event::Pass',
73 package => 'Test2::Event::Pass',
DBail.t3 use Test2::Tools::Tiny;
4 use Test2::Event::Bail;
5 use Test2::EventFacet::Trace;
7 my $bail = Test2::Event::Bail->new(
8 trace => Test2::EventFacet::Trace->new(frame => ['foo', 'foo.t', 42]),
27 package => 'Test2::Event::Bail',
54 package => 'Test2::Event::Bail',
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/
DEvent.pm1 package Test2::Event;
10 use Test2::Util::HashBase qw/trace -amnesty uuid -_eid -hubs/;
11 use Test2::Util::ExternalMeta qw/meta get_meta set_meta delete_meta/;
12 use Test2::Util qw/pkg_to_file gen_uid/;
14 use Test2::EventFacet::About();
15 use Test2::EventFacet::Amnesty();
16 use Test2::EventFacet::Assert();
17 use Test2::EventFacet::Control();
18 use Test2::EventFacet::Error();
19 use Test2::EventFacet::Info();
[all …]
DIPC.pm1 package Test2::IPC;
8 use Test2::API::Instance;
9 use Test2::Util qw/get_tid/;
10 use Test2::API qw{
37 sub unimport { Test2::API::test2_ipc_disable() }
42 confess "IPC is disabled" if Test2::API::test2_ipc_disabled();
46 Test2::API::_set_ipc(_make_ipc());
54 my ($driver) = Test2::API::test2_ipc_drivers();
56 require Test2::IPC::Driver::Files;
DAPI.pm1 package Test2::API;
6 use Test2::Util qw/USE_THREADS/;
38 my $trace = Test2::EventFacet::Trace->new(
41 my $ctx = Test2::API::Context->new(
51 use Test2::API::Instance(\$INST);
77 if($] ge '5.014' || $ENV{T2_CHECK_DEPTH} || $Test2::API::DO_DEPTH_CHECK) {
85 use Test2::EventFacet::Trace();
86 use Test2::Util::Trace(); # Legacy
88 use Test2::Hub::Subtest();
89 use Test2::Hub::Interceptor();
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/Tools/
DTiny.t4 use Test2::IPC;
5 use Test2::Tools::Tiny;
7 use Test2::API qw/context intercept test2_stack/;
79 my ($plan, $ok, $is, $isnt, $like, $unlike, $is_deeply) = grep {!$_->isa('Test2::Event::Diag')} @$m…
82 ok($plan->isa('Test2::Event::Plan'), "got plan");
85 ok($ok->isa('Test2::Event::Fail'), "got 'ok' result");
88 ok($is->isa('Test2::Event::Fail'), "got 'is' result");
91 ok($isnt->isa('Test2::Event::Fail'), "got 'isnt' result");
94 ok($like->isa('Test2::Event::Fail'), "got 'like' result");
97 ok($unlike->isa('Test2::Event::Fail'), "got 'unlike' result");
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/Hub/
DSubtest.t3 use Test2::Tools::Tiny;
5 use Test2::Hub::Subtest;
6 use Test2::Util qw/get_tid/;
42 my $one = Test2::Hub::Subtest->new(
46 ok($one->isa('Test2::Hub'), "inheritance");
50 local *Test2::Hub::process = sub { $ran++; (undef, $event) = @_; 'P!' };
53 my $ok = Test2::Event::Ok->new(
56 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__, 'xxx']),
67 my $bail = Test2::Event::Bail->new(
69 trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__, 'xxx']),
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/IPC/
DDriver.t4 use Test2::IPC::Driver::Files;
6 use Test2::Tools::Tiny;
7 use Test2::API qw/context test2_ipc_drivers/;
9 Test2::IPC::Driver::Files->import();
10 Test2::IPC::Driver::Files->import();
11 Test2::IPC::Driver::Files->import();
15 ['Test2::IPC::Driver::Files'],
20 my $one = Test2::IPC::Driver->new;
31 my $one = Test2::IPC::Driver->new(no_fatal => 1);
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/Hub/
DSubtest.pm1 package Test2::Hub::Subtest;
7 BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
8 use Test2::Util::HashBase qw/nested exit_code manual_skip_all/;
9 use Test2::Util qw/get_tid/;
25 *ID = \&Test2::Hub::HID;
26 *id = \&Test2::Hub::hid;
27 *set_id = \&Test2::Hub::set_hid;
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/Event/
DPass.pm1 package Test2::Event::Pass;
7 use Test2::EventFacet::Info;
10 require Test2::Event;
12 *META_KEY = \&Test2::Util::ExternalMeta::META_KEY;
15 use Test2::Util::HashBase qw{ -name -info };
37 $in = Test2::EventFacet::Info->new($in);
DFail.pm1 package Test2::Event::Fail;
7 use Test2::EventFacet::Info;
10 require Test2::Event;
12 *META_KEY = \&Test2::Util::ExternalMeta::META_KEY;
15 use Test2::Util::HashBase qw{ -name -info };
42 $in = Test2::EventFacet::Info->new($in);
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/API/
DInstance.t4 use Test2::IPC;
5 use Test2::Tools::Tiny;
6 use Test2::Util qw/CAN_THREAD CAN_REALLY_FORK USE_THREADS get_tid/;
16 my $CLASS = 'Test2::API::Instance';
142 is($one->formatter, 'Test2::Formatter::TAP', "got specified formatter");
145 local $ENV{T2_FORMATTER} = '+Test2::Formatter::TAP';
147 is($one->formatter, 'Test2::Formatter::TAP', "got specified formatter");
190 is(Test2::API::Instance::_ipc_wait, 0, "No errors");
198 is(Test2::API::Instance::_ipc_wait, 255, "Process exited badly");
209 is(Test2::API::Instance::_ipc_wait, 255, "Process exited badly");
[all …]
DInterceptResult.t5 use Test2::Tools::Tiny;
6 use Test2::API::InterceptResult;
8 use Test2::API qw/intercept context/;
10 my $CLASS = 'Test2::API::InterceptResult';
45 require Test2::Event::Pass;
46 …my $event = Test2::Event::Pass->new(name => 'soup for you', trace => {frame => ['foo', 'foo.pl', 4…
47 ok($event->isa('Test2::Event'), "Start with an event");
51 ok($up->isa('Test2::API::InterceptResult::Event'), "Upgraded the event");
63 require Test2::Event::V2;
64 my $subtest = 'Test2::Event::V2'->new(
[all …]

12345678