From 3bc7ad013c5af9b18752b1f48eaa9d005dcc16c0 Mon Sep 17 00:00:00 2001 From: "Jerry D. Hedden" Date: Wed, 25 Oct 2006 04:27:15 -0700 Subject: [PATCH] threads-shared 1.05 From: "Jerry D. Hedden" Message-ID: <20061025182715.561.qmail@web30211.mail.mud.yahoo.com> p4raw-id: //depot/perl@29110 --- ext/threads/shared/Changes | 10 +++++++++- ext/threads/shared/Makefile.PL | 23 +++++++++++++---------- ext/threads/shared/README | 2 +- ext/threads/shared/shared.pm | 6 +++--- ext/threads/shared/shared.xs | 9 +++++---- 5 files changed, 31 insertions(+), 19 deletions(-) diff --git a/ext/threads/shared/Changes b/ext/threads/shared/Changes index 97d7f97..006232f 100644 --- a/ext/threads/shared/Changes +++ b/ext/threads/shared/Changes @@ -1,7 +1,15 @@ Revision history for Perl extension threads::shared. +1.05 Wed Oct 25 14:22:23 EDT 2006 + - Makefile.PL changes for CORE + - g++ build fixes + +1.04 Thu Oct 12 10:40:18 EDT 2006 + - Added example script + - Added POD tests + 1.03 Fri Sep 15 15:09:26 EDT 2006 - - Fix memory leak caused blessed shared objects + - Fix memory leak caused by blessed shared objects - Upgraded ppport.h to Devel::PPPort 3.10 1.02 Fri Jul 14 08:56:03 EDT 2006 diff --git a/ext/threads/shared/Makefile.PL b/ext/threads/shared/Makefile.PL index beccf25..ac35f2a 100755 --- a/ext/threads/shared/Makefile.PL +++ b/ext/threads/shared/Makefile.PL @@ -58,17 +58,21 @@ if (grep { $_ eq 'PERL_CORE=1' } @ARGV) { die("No 'C' compiler found to build 'threads'\n"); } - push(@conditional_params, 'DEFINE' => '-DHAS_PPPORT_H'); + push(@conditional_params, 'DEFINE' => '-DHAS_PPPORT_H', + 'PREREQ_PM' => { + 'strict' => 0, + 'warnings' => 0, + 'threads' => 0, + 'Config' => 0, + 'Carp' => 0, + 'XSLoader' => 0, + + 'Test' => 0, + 'Test::More' => 0, + 'ExtUtils::testlib' => 0, + }); } -my $prereqs; - -if(!$ENV{PERL_CORE}) { - $prereqs = { - 'threads' => 0, - 'XSLoader' => 0, - }; -} # Create Makefile WriteMakefile( @@ -79,7 +83,6 @@ WriteMakefile( 'PM' => { 'shared.pm' => '$(INST_LIBDIR)/shared.pm', }, - 'PREREQ_PM' => $prereqs, 'INSTALLDIRS' => 'perl', ((ExtUtils::MakeMaker->VERSION() lt '6.25') ? diff --git a/ext/threads/shared/README b/ext/threads/shared/README index 0f703d1..e5aead4 100644 --- a/ext/threads/shared/README +++ b/ext/threads/shared/README @@ -1,4 +1,4 @@ -threads::shared version 1.03 +threads::shared version 1.05 ============================ This module needs Perl 5.8.0 or later compiled with USEITHREADS. diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm index c2595f2..d4a0eeb 100644 --- a/ext/threads/shared/shared.pm +++ b/ext/threads/shared/shared.pm @@ -5,7 +5,7 @@ use 5.008; use strict; use warnings; -our $VERSION = '1.04'; +our $VERSION = '1.05'; my $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -73,7 +73,7 @@ threads::shared - Perl extension for sharing data structures between threads =head1 VERSION -This document describes threads::shared version 1.04 +This document describes threads::shared version 1.05 =head1 SYNOPSIS @@ -368,7 +368,7 @@ L Discussion Forum on CPAN: L Annotated POD for L: -L +L L, L diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index 25fdec6..88d1e5c 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -318,10 +318,11 @@ MGVTBL sharedsv_userlock_vtbl = { the shared thing. */ -extern MGVTBL sharedsv_scalar_vtbl; /* Scalars have this vtable */ -extern MGVTBL sharedsv_array_vtbl; /* Hashes and arrays have this - like 'tie' */ -extern MGVTBL sharedsv_elem_vtbl; /* Elements of hashes and arrays have this - _AS WELL AS_ the scalar magic: +extern MGVTBL sharedsv_scalar_vtbl; /* Scalars have this vtable */ +extern MGVTBL sharedsv_array_vtbl; /* Hashes and arrays have this + - like 'tie' */ +extern MGVTBL sharedsv_elem_vtbl; /* Elements of hashes and arrays have + this _AS WELL AS_ the scalar magic: The sharedsv_elem_vtbl associates the element with the array/hash and the sharedsv_scalar_vtbl associates it with the value */ -- 2.7.4