diff options
| author | Abe Timmerman <abe@ztreet.demon.nl> | 2003-03-02 03:03:16 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-03-02 07:27:44 +0000 |
| commit | 2aa6a10326178f0f3d8bbf2f0847bd6f4e40b81b (patch) | |
| tree | b1c0c9278ff752824d3a75e02b507442f566114e | |
| parent | 78da4d13e9515c4d820a5423a160a2c81889d633 (diff) | |
| download | perl-2aa6a10326178f0f3d8bbf2f0847bd6f4e40b81b.tar.gz | |
Re: [PATCH embed.fnc] Re: [PATCH] Get MSWin32 back compiling
Message-Id: <200303020203.16708.abe@ztreet.demon.nl>
p4raw-id: //depot/perl@18795
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | embed.h | 4 | ||||
| -rw-r--r-- | makedef.pl | 1 |
3 files changed, 2 insertions, 5 deletions
@@ -945,7 +945,7 @@ Ap |char * |custom_op_name|OP* op Ap |char * |custom_op_desc|OP* op #if defined(PERL_COPY_ON_WRITE) -pM |int |sv_release_IVX |SV *sv +ApM |int |sv_release_IVX |SV *sv #endif Adp |void |sv_nosharing |SV * @@ -1230,10 +1230,8 @@ #define custom_op_name Perl_custom_op_name #define custom_op_desc Perl_custom_op_desc #if defined(PERL_COPY_ON_WRITE) -#ifdef PERL_CORE #define sv_release_IVX Perl_sv_release_IVX #endif -#endif #define sv_nosharing Perl_sv_nosharing #define sv_nolocking Perl_sv_nolocking #define sv_nounlocking Perl_sv_nounlocking @@ -3682,10 +3680,8 @@ #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) -#ifdef PERL_CORE #define sv_release_IVX(a) Perl_sv_release_IVX(aTHX_ a) #endif -#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) diff --git a/makedef.pl b/makedef.pl index 848e8d98fe..ef84c18796 100644 --- a/makedef.pl +++ b/makedef.pl @@ -563,6 +563,7 @@ else { unless ($define{'PERL_COPY_ON_WRITE'}) { skip_symbols [qw( Perl_sv_setsv_cow + Perl_sv_release_IVX )]; } |