diff options
| author | Nicholas Clark <nick@ccl4.org> | 2004-01-06 18:57:29 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2004-01-06 18:57:29 +0000 |
| commit | 049737a6f0a706e47a848e799c32df4d07613448 (patch) | |
| tree | d9e255afe2e5b7f91e8ae311ca56fac5c65a1521 | |
| parent | 800633c3daced5882d77eb7f133a700d5838565e (diff) | |
| download | perl-049737a6f0a706e47a848e799c32df4d07613448.tar.gz | |
Seems that sv_setsv_cow needs to be visible to core extensions,
so that re will build properly on Win32. Thanks to Steve Hay for
trying COW and finding the problems.
p4raw-id: //depot/perl@22083
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | embed.h | 4 |
2 files changed, 3 insertions, 3 deletions
@@ -1323,7 +1323,7 @@ Apd |void |sv_copypv |SV* dsv|SV* ssv Ap |char* |my_atof2 |const char *s|NV* value Apn |int |my_socketpair |int family|int type|int protocol|int fd[2] #ifdef PERL_COPY_ON_WRITE -pMX |SV* |sv_setsv_cow |SV* dsv|SV* ssv +pMXE |SV* |sv_setsv_cow |SV* dsv|SV* ssv #endif #if defined(USE_PERLIO) && !defined(USE_SFIO) @@ -2050,7 +2050,7 @@ #define my_atof2 Perl_my_atof2 #define my_socketpair Perl_my_socketpair #ifdef PERL_COPY_ON_WRITE -#ifdef PERL_CORE +#if defined(PERL_CORE) || defined(PERL_EXT) #define sv_setsv_cow Perl_sv_setsv_cow #endif #endif @@ -4543,7 +4543,7 @@ #define my_atof2(a,b) Perl_my_atof2(aTHX_ a,b) #define my_socketpair Perl_my_socketpair #ifdef PERL_COPY_ON_WRITE -#ifdef PERL_CORE +#if defined(PERL_CORE) || defined(PERL_EXT) #define sv_setsv_cow(a,b) Perl_sv_setsv_cow(aTHX_ a,b) #endif #endif |