Upgrade Test::Simple from version 1.302136 to 1.302138
authorSteve Hay <steve.m.hay@googlemail.com>
Mon, 16 Jul 2018 07:55:18 +0000 (08:55 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Mon, 16 Jul 2018 07:55:18 +0000 (08:55 +0100)
67 files changed:
MANIFEST
Porting/Maintainers.pl
cpan/Test-Simple/lib/Test/Builder.pm
cpan/Test-Simple/lib/Test/Builder/Formatter.pm
cpan/Test-Simple/lib/Test/Builder/Module.pm
cpan/Test-Simple/lib/Test/Builder/Tester.pm
cpan/Test-Simple/lib/Test/Builder/Tester/Color.pm
cpan/Test-Simple/lib/Test/Builder/TodoDiag.pm
cpan/Test-Simple/lib/Test/More.pm
cpan/Test-Simple/lib/Test/Simple.pm
cpan/Test-Simple/lib/Test/Tester.pm
cpan/Test-Simple/lib/Test/Tester/Capture.pm
cpan/Test-Simple/lib/Test/Tester/CaptureRunner.pm
cpan/Test-Simple/lib/Test/Tester/Delegate.pm
cpan/Test-Simple/lib/Test/use/ok.pm
cpan/Test-Simple/lib/Test2.pm
cpan/Test-Simple/lib/Test2/API.pm
cpan/Test-Simple/lib/Test2/API/Breakage.pm
cpan/Test-Simple/lib/Test2/API/Context.pm
cpan/Test-Simple/lib/Test2/API/Instance.pm
cpan/Test-Simple/lib/Test2/API/Stack.pm
cpan/Test-Simple/lib/Test2/Event.pm
cpan/Test-Simple/lib/Test2/Event/Bail.pm
cpan/Test-Simple/lib/Test2/Event/Diag.pm
cpan/Test-Simple/lib/Test2/Event/Encoding.pm
cpan/Test-Simple/lib/Test2/Event/Exception.pm
cpan/Test-Simple/lib/Test2/Event/Fail.pm
cpan/Test-Simple/lib/Test2/Event/Generic.pm
cpan/Test-Simple/lib/Test2/Event/Note.pm
cpan/Test-Simple/lib/Test2/Event/Ok.pm
cpan/Test-Simple/lib/Test2/Event/Pass.pm
cpan/Test-Simple/lib/Test2/Event/Plan.pm
cpan/Test-Simple/lib/Test2/Event/Skip.pm
cpan/Test-Simple/lib/Test2/Event/Subtest.pm
cpan/Test-Simple/lib/Test2/Event/TAP/Version.pm
cpan/Test-Simple/lib/Test2/Event/V2.pm
cpan/Test-Simple/lib/Test2/Event/Waiting.pm
cpan/Test-Simple/lib/Test2/EventFacet.pm
cpan/Test-Simple/lib/Test2/EventFacet/About.pm
cpan/Test-Simple/lib/Test2/EventFacet/Amnesty.pm
cpan/Test-Simple/lib/Test2/EventFacet/Assert.pm
cpan/Test-Simple/lib/Test2/EventFacet/Control.pm
cpan/Test-Simple/lib/Test2/EventFacet/Error.pm
cpan/Test-Simple/lib/Test2/EventFacet/Hub.pm
cpan/Test-Simple/lib/Test2/EventFacet/Info.pm
cpan/Test-Simple/lib/Test2/EventFacet/Meta.pm
cpan/Test-Simple/lib/Test2/EventFacet/Parent.pm
cpan/Test-Simple/lib/Test2/EventFacet/Plan.pm
cpan/Test-Simple/lib/Test2/EventFacet/Render.pm
cpan/Test-Simple/lib/Test2/EventFacet/Trace.pm
cpan/Test-Simple/lib/Test2/Formatter.pm
cpan/Test-Simple/lib/Test2/Formatter/TAP.pm
cpan/Test-Simple/lib/Test2/Hub.pm
cpan/Test-Simple/lib/Test2/Hub/Interceptor.pm
cpan/Test-Simple/lib/Test2/Hub/Interceptor/Terminator.pm
cpan/Test-Simple/lib/Test2/Hub/Subtest.pm
cpan/Test-Simple/lib/Test2/IPC.pm
cpan/Test-Simple/lib/Test2/IPC/Driver.pm
cpan/Test-Simple/lib/Test2/IPC/Driver/Files.pm
cpan/Test-Simple/lib/Test2/Tools/Tiny.pm
cpan/Test-Simple/lib/Test2/Util.pm
cpan/Test-Simple/lib/Test2/Util/ExternalMeta.pm
cpan/Test-Simple/lib/Test2/Util/Facets2Legacy.pm
cpan/Test-Simple/lib/Test2/Util/HashBase.pm
cpan/Test-Simple/lib/Test2/Util/Trace.pm
cpan/Test-Simple/lib/ok.pm
cpan/Test-Simple/t/regression/fork_first.t [new file with mode: 0644]

index aa76ccb..c6338ea 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -2506,6 +2506,7 @@ cpan/Test-Simple/t/regression/757-reset_in_subtest.t
 cpan/Test-Simple/t/regression/buffered_subtest_plan_buffered.t
 cpan/Test-Simple/t/regression/builder_does_not_init.t
 cpan/Test-Simple/t/regression/errors_facet.t
+cpan/Test-Simple/t/regression/fork_first.t
 cpan/Test-Simple/t/regression/inherit_trace.t
 cpan/Test-Simple/t/regression/no_name_in_subtest.t
 cpan/Test-Simple/t/regression/todo_and_facets.t
index 4c50c38..225d978 100755 (executable)
@@ -1076,7 +1076,7 @@ use File::Glob qw(:case);
     },
 
     'Test::Simple' => {
-        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302136.tar.gz',
+        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302138.tar.gz',
         'FILES'        => q[cpan/Test-Simple],
         'EXCLUDED'     => [
             qr{^examples/},
index 966b3cf..55f2b04 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN {
     if( $] < 5.008 ) {
index 7c0a454..b4dc736 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
 
index 6ac1466..c53e090 100644 (file)
@@ -7,7 +7,7 @@ use Test::Builder;
 require Exporter;
 our @ISA = qw(Exporter);
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 =head1 NAME
index c92a468..d9b2493 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester;
 
 use strict;
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test::Builder;
 use Symbol;
index 52e73fa..3b27fe7 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester::Color;
 
 use strict;
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 require Test::Builder::Tester;
 
index 62ccc0c..b44f937 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::TodoDiag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
 
index 2f1d592..12146e3 100644 (file)
@@ -17,7 +17,7 @@ sub _carp {
     return warn @_, " at $file line $line\n";
 }
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index c84554d..1223463 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 
 use strict;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index ef00812..d8372e4 100644 (file)
@@ -18,7 +18,7 @@ require Exporter;
 
 use vars qw( @ISA @EXPORT );
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 @EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
 @ISA = qw( Exporter );
index fca6763..5e3ea6b 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 
 package Test::Tester::Capture;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test::Builder;
index 93a4923..65b8265 100644 (file)
@@ -3,7 +3,7 @@ use strict;
 
 package Test::Tester::CaptureRunner;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test::Tester::Capture;
index f8c96c6..beb48cf 100644 (file)
@@ -3,7 +3,7 @@ use warnings;
 
 package Test::Tester::Delegate;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Scalar::Util();
 
index 5236b8a..036a63f 100644 (file)
@@ -1,7 +1,7 @@
 package Test::use::ok;
 use 5.005;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 __END__
index 86f8835..e52a30f 100644 (file)
@@ -2,7 +2,7 @@ package Test2;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 1;
index 8f6f299..fa5e008 100644 (file)
@@ -9,7 +9,7 @@ BEGIN {
     $ENV{TEST2_ACTIVE} = 1;
 }
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 my $INST;
index afed100..474568e 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Breakage;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test2::Util qw/pkg_to_file/;
index 85039ac..f42256c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Context;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Carp qw/confess croak/;
index 8e39d8a..22d77a0 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Instance;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 our @CARP_NOT = qw/Test2::API Test2::API::Instance Test2::IPC::Driver Test2::Formatter/;
index dc08b8f..8a3e4b9 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Stack;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test2::Hub();
index 466975b..bdcee2c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Scalar::Util qw/blessed reftype/;
 use Carp qw/croak/;
index 6395417..54b190a 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Bail;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 8b4d214..df56f0a 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Diag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 06421db..1f2e013 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Encoding;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Carp qw/croak/;
 
index fe2301a..4be7077 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Exception;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 7ce8972..6917765 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Fail;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test2::EventFacet::Info;
 
index 67d97bc..af49d61 100644 (file)
@@ -5,7 +5,7 @@ use warnings;
 use Carp qw/croak/;
 use Scalar::Util qw/reftype/;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase;
index b35d1b8..c17b5fe 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Note;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index d774174..cb31dd0 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Ok;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index b00df12..ec19cd8 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Pass;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test2::EventFacet::Info;
 
index 1dbacd9..4eab909 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Plan;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 51195a2..7c64cb4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Skip;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
index 6ef09fb..9b738dc 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
 use Test2::Util::HashBase qw{subevents buffered subtest_id subtest_uuid};
index b80a68b..00f2b14 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::TAP::Version;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Carp qw/croak/;
 
index 326955e..4bb2bb5 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::V2;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Scalar::Util qw/reftype/;
 use Carp qw/croak/;
index eb84837..dbf0990 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Waiting;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 3eb8335..7cf2fd0 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test2::Util::HashBase qw/-details/;
 use Carp qw/croak/;
index 7145a6d..3b9bfe0 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::About;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -package -no_display -uuid -eid };
index 4eeeb4c..5f93939 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Amnesty;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 sub is_list { 1 }
 
index abebc28..fc722d6 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Assert;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -pass -no_debug -number };
index 81d0576..21ee8b5 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Control;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -global -terminate -halt -has_callback -encoding };
index 5e9e1d0..bdd4538 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Error;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 sub facet_key { 'errors' }
 sub is_list { 1 }
index 6c7936e..7525894 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Hub;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 sub is_list { 1 }
 sub facet_key { 'hubs' }
index 54a35fd..48bd734 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Info;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 sub is_list { 1 }
 
index 10403a9..7704da9 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Meta;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use vars qw/$AUTOLOAD/;
index 054a361..8d782d4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Parent;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Carp qw/confess/;
 
index 3b4774d..4b9fabf 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Plan;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -count -skip -none };
index cc07b78..c3ac286 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Render;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 sub is_list { 1 }
 
index 35d3d84..dc3e32b 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Trace;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 
index c553399..a31d232 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 my %ADDED;
index 2faee62..9bc2902 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Formatter::TAP;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Test2::Util qw/clone_io/;
 
index 3754f22..adc143a 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Carp qw/carp croak confess/;
index a08aad8..1c101fa 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test2::Hub::Interceptor::Terminator();
index 1925e86..76c01c4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor::Terminator;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 1;
index 707c941..853b254 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
 use Test2::Util::HashBase qw/nested exit_code manual_skip_all/;
index 7e7ae26..5493bd4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Test2::API::Instance;
@@ -18,6 +18,9 @@ use Test2::API qw{
     context
 };
 
+# Make sure stuff is finalized before anyone tried to fork or start a new thread.
+INIT { context()->release() }
+
 use Carp qw/confess/;
 
 our @EXPORT_OK = qw/cull/;
index 6026cd4..7f74992 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Carp qw/confess/;
index 6b34163..4a62f4c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver::Files;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) }
index 2892853..808998c 100644 (file)
@@ -16,7 +16,7 @@ use Test2::API qw/context run_subtest test2_stack/;
 use Test2::Hub::Interceptor();
 use Test2::Hub::Interceptor::Terminator();
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 BEGIN { require Exporter; our @ISA = qw(Exporter) }
 our @EXPORT = qw{
index fd71bed..eed3490 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use POSIX();
 use Config qw/%Config/;
index 8190131..b8f9e58 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::ExternalMeta;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 
 use Carp qw/croak/;
index b4144c7..5a4214e 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::Facets2Legacy;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use Carp qw/croak confess/;
 use Scalar::Util qw/blessed/;
index 7781c2e..526923d 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::HashBase;
 use strict;
 use warnings;
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 #################################################################
 #                                                               #
index bcab397..a126118 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::Trace;
 require Test2::EventFacet::Trace;
 @ISA = ('Test2::EventFacet::Trace');
 
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 1;
 
index cbdde48..c1075ec 100644 (file)
@@ -1,5 +1,5 @@
 package ok;
-our $VERSION = '1.302136';
+our $VERSION = '1.302138';
 
 use strict;
 use Test::More ();
diff --git a/cpan/Test-Simple/t/regression/fork_first.t b/cpan/Test-Simple/t/regression/fork_first.t
new file mode 100644 (file)
index 0000000..0b1ae25
--- /dev/null
@@ -0,0 +1,33 @@
+use Test2::Tools::Tiny;
+use strict;
+use warnings;
+
+use Test2::IPC;
+use Test2::Util qw/CAN_THREAD CAN_REALLY_FORK/;
+
+skip_all 'No IPC' unless CAN_REALLY_FORK || CAN_THREAD;
+
+if (CAN_REALLY_FORK) {
+    my $pid = fork;
+    die "Failed to fork: $!" unless defined $pid;
+    if ($pid) {
+        waitpid($pid, 0)
+    }
+    else {
+        ok(1, "Pass fork");
+        exit 0;
+    }
+}
+
+if (CAN_THREAD) {
+    require threads;
+    my $thread = threads->create(
+        sub {
+            ok(1, "Pass thread");
+        }
+    );
+
+    $thread->join;
+}
+
+done_testing;