diff options
Diffstat (limited to 'ext/threads/shared/shared.pm')
| -rw-r--r-- | ext/threads/shared/shared.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm index 3fec35670f..d928d26349 100644 --- a/ext/threads/shared/shared.pm +++ b/ext/threads/shared/shared.pm @@ -63,6 +63,7 @@ sub CLONE { sub DESTROY { my $self = shift; + _thrcnt_dec($$self); delete($shared{$$self}); } |