FAQ
In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/95ec88f91eb8b0df06820832434e1de7ea98394e?hp=9ec93952bf7c183cc01466806c75ca9fcbc2548f>

- Log -----------------------------------------------------------------
commit 95ec88f91eb8b0df06820832434e1de7ea98394e
Author: jdhedden <jdhedden@cpan.org>
Date: Mon May 16 13:41:39 2016 -0400

     Upgrade to threads 2.08
-----------------------------------------------------------------------

Summary of changes:
  Porting/Maintainers.pl | 2 +-
  dist/threads/lib/threads.pm | 13 +++++++++----
  dist/threads/t/exit.t | 10 +++++-----
  dist/threads/t/thread.t | 2 +-
  4 files changed, 16 insertions(+), 11 deletions(-)

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index a7868ea..a90e302 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -1177,7 +1177,7 @@ use File::Glob qw(:case);
      },

      'threads' => {
- 'DISTRIBUTION' => 'JDHEDDEN/threads-2.07.tar.gz',
+ 'DISTRIBUTION' => 'JDHEDDEN/threads-2.08.tar.gz',
          'FILES' => q[dist/threads],
          'EXCLUDED' => [
              qr{^examples/},
diff --git a/dist/threads/lib/threads.pm b/dist/threads/lib/threads.pm
index 39761be..182c359 100644
--- a/dist/threads/lib/threads.pm
+++ b/dist/threads/lib/threads.pm
@@ -5,7 +5,7 @@ use 5.008;
  use strict;
  use warnings;

-our $VERSION = '2.07';
+our $VERSION = '2.08';
  my $XS_VERSION = $VERSION;
  $VERSION = eval $VERSION;

@@ -134,7 +134,7 @@ threads - Perl interpreter-based threads

  =head1 VERSION

-This document describes threads version 2.07
+This document describes threads version 2.08

  =head1 WARNING

@@ -1086,8 +1086,11 @@ Perl 5.8.0 or later

  =head1 SEE ALSO

-L<threads> Discussion Forum on CPAN:
-L<http://www.cpanforum.com/dist/threads>
+threads on MetaCPAN:
+L<https://metacpan.org/release/threads>
+
+Code repository for CPAN distribution:
+L<https://github.com/Dual-Life/threads>

  L<threads::shared>, L<perlthrtut>

@@ -1100,6 +1103,8 @@ L<http://lists.perl.org/list/ithreads.html>
  Stack size discussion:
  L<http://www.perlmonks.org/?node_id=532956>

+Sample code in the I<examples> directory of this distribution on CPAN.
+
  =head1 AUTHOR

  Artur Bergman E<lt>sky AT crucially DOT netE<gt>
diff --git a/dist/threads/t/exit.t b/dist/threads/t/exit.t
index 16d7a7a..d9c4aa7 100644
--- a/dist/threads/t/exit.t
+++ b/dist/threads/t/exit.t
@@ -48,7 +48,7 @@ my $rc = $thr->join();
  ok(! defined($rc), 'Exited: threads->exit()');


-run_perl(prog => 'use threads 2.07;' .
+run_perl(prog => 'use threads 2.08;' .
                   'threads->exit(86);' .
                   'exit(99);',
           nolib => ($ENV{PERL_CORE}) ? 0 : 1,
@@ -98,7 +98,7 @@ $rc = $thr->join();
  ok(! defined($rc), 'Exited: $thr->set_thread_exit_only');


-run_perl(prog => 'use threads 2.07 qw(exit thread_only);' .
+run_perl(prog => 'use threads 2.08 qw(exit thread_only);' .
                   'threads->create(sub { exit(99); })->join();' .
                   'exit(86);',
           nolib => ($ENV{PERL_CORE}) ? 0 : 1,
@@ -108,7 +108,7 @@ run_perl(prog => 'use threads 2.07 qw(exit thread_only);' .
      is($?>>8, 86, "'use threads 'exit' => 'thread_only'");
  }

-my $out = run_perl(prog => 'use threads 2.07;' .
+my $out = run_perl(prog => 'use threads 2.08;' .
                             'threads->create(sub {' .
                             ' exit(99);' .
                             '});' .
@@ -124,7 +124,7 @@ my $out = run_perl(prog => 'use threads 2.07;' .
  like($out, qr/1 finished and unjoined/, "exit(status) in thread");


-$out = run_perl(prog => 'use threads 2.07 qw(exit thread_only);' .
+$out = run_perl(prog => 'use threads 2.08 qw(exit thread_only);' .
                          'threads->create(sub {' .
                          ' threads->set_thread_exit_only(0);' .
                          ' exit(99);' .
@@ -141,7 +141,7 @@ $out = run_perl(prog => 'use threads 2.07 qw(exit thread_only);' .
  like($out, qr/1 finished and unjoined/, "set_thread_exit_only(0)");


-run_perl(prog => 'use threads 2.07;' .
+run_perl(prog => 'use threads 2.08;' .
                   'threads->create(sub {' .
                   ' $SIG{__WARN__} = sub { exit(99); };' .
                   ' die();' .
diff --git a/dist/threads/t/thread.t b/dist/threads/t/thread.t
index 4628b27..24cf2f3 100644
--- a/dist/threads/t/thread.t
+++ b/dist/threads/t/thread.t
@@ -161,7 +161,7 @@ package main;

  # bugid #24165

-run_perl(prog => 'use threads 2.07;' .
+run_perl(prog => 'use threads 2.08;' .
                   'sub a{threads->create(shift)} $t = a sub{};' .
                   '$t->tid; $t->join; $t->tid',
           nolib => ($ENV{PERL_CORE}) ? 0 : 1,

--
Perl5 Master Repository

Search Discussions

Related Discussions

Discussion Navigation
viewthread | post
posts ‹ prev | 1 of 1 | next ›
Discussion Overview
groupperl5-changes @
categoriesperl
postedMay 16, '16 at 10:26p
activeMay 16, '16 at 10:26p
posts1
users1
websiteperl.org

1 user in discussion

James Keenan: 1 post

People

Translate

site design / logo © 2021 Grokbase