This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
We only need to fetch the SV from the backend if the index
authorArtur Bergman <sky@nanisky.com>
Wed, 24 Oct 2001 11:06:35 +0000 (11:06 +0000)
committerArtur Bergman <sky@nanisky.com>
Wed, 24 Oct 2001 11:06:35 +0000 (11:06 +0000)
commit55fc11ad574fdface3f93a0c10965511fdcfd69b
treeb64a952ebff3af0e9e9c0f52f78534a381015899
parent8eb28a70b2ec19f2782a68fd1ccf1a9a24131140
We only need to fetch the SV from the backend if the index
is not the same as mg_private. In theory this could be
a problem if there are an exact multiple of U16 changes
of a shared variable between two access in a given thread,
we choose to avoid theory for now.

p4raw-id: //depot/perl@12616
ext/threads/shared/shared.xs
sharedsv.c
sharedsv.h