In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/0cf18b74ec1005ca929e64dd9158674d5163ff0a?hp=1bee6aebe39da1a4d681e8ea1b9d0329898a8407>
- Log ----------------------------------------------------------------- commit 0cf18b74ec1005ca929e64dd9158674d5163ff0a Author: Father Chrysostomos <[email protected]> Date: Wed Aug 17 19:47:20 2016 -0700 Revert threads-dirh.t part of 624c42e21 async needs to be imported from threads.pm at compile time for async { ... } to compile correctly. ----------------------------------------------------------------------- Summary of changes: t/op/threads-dirh.t | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/t/op/threads-dirh.t b/t/op/threads-dirh.t index 82d9076..e1d5c99 100644 --- a/t/op/threads-dirh.t +++ b/t/op/threads-dirh.t @@ -4,21 +4,21 @@ BEGIN { chdir 't' if -d 't'; + @INC = '../lib'; require './test.pl'; - set_up_inc('../lib'); $| = 1; - require Config; -} -skip_all_without_config('useithreads'); -skip_all_if_miniperl("no dynamic loading on miniperl, no threads"); + require Config; + skip_all_without_config('useithreads'); + skip_all_if_miniperl("no dynamic loading on miniperl, no threads"); -plan(6); + plan(6); +} use strict; use warnings; -eval q/use threads/; -eval q/use threads::shared/; +use threads; +use threads::shared; use File::Path; use File::Spec::Functions qw 'updir catdir'; use Cwd 'getcwd'; -- Perl5 Master Repository
