diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-19 22:17:07 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-19 22:17:07 +0000 |
| commit | 68795e9367de98482c4a5830e6e94b51bd60f4e3 (patch) | |
| tree | ce6632db4435b22ae2f82e511a34f76563752e4a /proto.h | |
| parent | 92110913508b9944d111285d9488f2f7b604919c (diff) | |
| download | perl-68795e9367de98482c4a5830e6e94b51bd60f4e3.tar.gz | |
Nearly-working threads re-structuring. Do not integrate,
submit-ing to get to Win32, and as "off site" backup.
p4raw-id: //depot/perlio@14352
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 14 |
1 files changed, 3 insertions, 11 deletions
@@ -980,6 +980,9 @@ PERL_CALLCONV void Perl_sys_intern_init(pTHX); PERL_CALLCONV char * Perl_custom_op_name(pTHX_ OP* op); PERL_CALLCONV char * Perl_custom_op_desc(pTHX_ OP* op); +PERL_CALLCONV void Perl_sv_nosharing(pTHX_ SV *); +PERL_CALLCONV void Perl_sv_nolocking(pTHX_ SV *); +PERL_CALLCONV void Perl_sv_nounlocking(pTHX_ SV *); END_EXTERN_C @@ -1189,17 +1192,6 @@ STATIC void S_debprof(pTHX_ OP *o); STATIC SV* S_save_scalar_at(pTHX_ SV **sptr); #endif -#if defined(USE_ITHREADS) -PERL_CALLCONV void Perl_sharedsv_init(pTHX); -PERL_CALLCONV shared_sv* Perl_sharedsv_new(pTHX); -PERL_CALLCONV shared_sv* Perl_sharedsv_find(pTHX_ SV* sv); -PERL_CALLCONV void Perl_sharedsv_lock(pTHX_ shared_sv* ssv); -PERL_CALLCONV void Perl_sharedsv_unlock(pTHX_ shared_sv* ssv); -PERL_CALLCONV void Perl_sharedsv_unlock_scope(pTHX_ shared_sv* ssv); -PERL_CALLCONV void Perl_sharedsv_thrcnt_inc(pTHX_ shared_sv* ssv); -PERL_CALLCONV void Perl_sharedsv_thrcnt_dec(pTHX_ shared_sv* ssv); -#endif - #if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT) STATIC IV S_asIV(pTHX_ SV* sv); STATIC UV S_asUV(pTHX_ SV* sv); |