diff options
Diffstat (limited to 'sharedsv.h')
| -rw-r--r-- | sharedsv.h | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/sharedsv.h b/sharedsv.h deleted file mode 100644 index f82804dba4..0000000000 --- a/sharedsv.h +++ /dev/null @@ -1,29 +0,0 @@ -#ifdef USE_ITHREADS - -typedef struct { - SV *sv; /* The actual SV */ - perl_mutex mutex; /* Our mutex */ - perl_cond cond; /* Our condition variable */ - perl_cond user_cond; /* For user-level conditions */ - IV locks; /* Number of locks held */ - PerlInterpreter *owner; /* Who owns the lock? */ - U16 index; /* Update index */ -} shared_sv; - -#define SHAREDSvGET(a) (a->sv) -#define SHAREDSvLOCK(a) Perl_sharedsv_lock(aTHX_ a) -#define SHAREDSvUNLOCK(a) Perl_sharedsv_unlock(aTHX_ a) - -#define SHAREDSvEDIT(a) STMT_START { \ - MUTEX_LOCK(&PL_sharedsv_space_mutex); \ - SHAREDSvLOCK((a)); \ - PERL_SET_CONTEXT(PL_sharedsv_space); \ - } STMT_END - -#define SHAREDSvRELEASE(a) STMT_START { \ - PERL_SET_CONTEXT((a)->owner); \ - SHAREDSvUNLOCK((a)); \ - MUTEX_UNLOCK(&PL_sharedsv_space_mutex); \ - } STMT_END - -#endif /* USE_ITHREADS */ |