diff options
| author | Nicholas Clark <nick@ccl4.org> | 2002-08-15 01:10:35 +0100 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-08-17 02:07:24 +0000 |
| commit | 765f542df20317f47bb284c276cd0abfb50dcfd6 (patch) | |
| tree | be92963942496ba900bdfb32c5b522ba355aafb0 /embed.h | |
| parent | 6f12eb6d2a1dfaf441504d869b27d2e40ef4966a (diff) | |
| download | perl-765f542df20317f47bb284c276cd0abfb50dcfd6.tar.gz | |
Copy On Write
Message-id: <20020815001035.A69079@plum.flirble.org>
specify "-Accflags='-DPERL_COPY_ON_WRITE'" to use
p4raw-id: //depot/perl@17728
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 12 |
1 files changed, 12 insertions, 0 deletions
@@ -859,6 +859,9 @@ #endif #define custom_op_name Perl_custom_op_name #define custom_op_desc Perl_custom_op_desc +#if defined(PERL_COPY_ON_WRITE) +#define sv_release_IVX Perl_sv_release_IVX +#endif #define sv_nosharing Perl_sv_nosharing #define sv_nolocking Perl_sv_nolocking #define sv_nounlocking Perl_sv_nounlocking @@ -1113,6 +1116,9 @@ # if defined(USE_ITHREADS) #define gv_share S_gv_share # endif +#if defined(PERL_COPY_ON_WRITE) +#define sv_release_COW S_sv_release_COW +#endif #endif #if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT) #define check_uni S_check_uni @@ -2412,6 +2418,9 @@ #endif #define custom_op_name(a) Perl_custom_op_name(aTHX_ a) #define custom_op_desc(a) Perl_custom_op_desc(aTHX_ a) +#if defined(PERL_COPY_ON_WRITE) +#define sv_release_IVX(a) Perl_sv_release_IVX(aTHX_ a) +#endif #define sv_nosharing(a) Perl_sv_nosharing(aTHX_ a) #define sv_nolocking(a) Perl_sv_nolocking(aTHX_ a) #define sv_nounlocking(a) Perl_sv_nounlocking(aTHX_ a) @@ -2665,6 +2674,9 @@ # if defined(USE_ITHREADS) #define gv_share(a,b) S_gv_share(aTHX_ a,b) # endif +#if defined(PERL_COPY_ON_WRITE) +#define sv_release_COW(a,b,c,d,e,f) S_sv_release_COW(aTHX_ a,b,c,d,e,f) +#endif #endif #if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT) #define check_uni() S_check_uni(aTHX) |