You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by nw...@apache.org on 2014/08/03 12:37:34 UTC
git commit: Mark Clownfish Perl objects as non-threadsafe
Repository: lucy-clownfish
Updated Branches:
refs/heads/master c25e32913 -> 165f9ffff
Mark Clownfish Perl objects as non-threadsafe
Define CLONE_SKIP in Clownfish::Obj so that objects won't be cloned in
child threads.
Project: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/commit/165f9fff
Tree: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/tree/165f9fff
Diff: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/diff/165f9fff
Branch: refs/heads/master
Commit: 165f9ffffd53a9cc95cd2284b17042960750c093
Parents: c25e329
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Sun Aug 3 12:33:51 2014 +0200
Committer: Nick Wellnhofer <we...@aevum.de>
Committed: Sun Aug 3 12:33:51 2014 +0200
----------------------------------------------------------------------
runtime/perl/lib/Clownfish.pm | 2 ++
1 file changed, 2 insertions(+)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/165f9fff/runtime/perl/lib/Clownfish.pm
----------------------------------------------------------------------
diff --git a/runtime/perl/lib/Clownfish.pm b/runtime/perl/lib/Clownfish.pm
index 7dff615..5f1bdd1 100644
--- a/runtime/perl/lib/Clownfish.pm
+++ b/runtime/perl/lib/Clownfish.pm
@@ -86,6 +86,8 @@ sub error {$Clownfish::Err::error}
$VERSION = eval $VERSION;
use Clownfish qw( to_clownfish to_perl );
use Carp qw( confess );
+ # Clownfish objects are not thread-safe.
+ sub CLONE_SKIP { 1; }
sub STORABLE_freeze {
my $class_name = ref(shift);
confess("Storable serialization not implemented for $class_name");