Change 33384 by [EMAIL PROTECTED] on 2008/02/27 12:29:36
Change variable name to fix debug build with PERL_OLD_COPY_ON_WRITE
Affected files ...
... //depot/perl/embed.fnc#590 edit
... //depot/perl/proto.h#925 edit
Differences ...
==== //depot/perl/embed.fnc#590 (text) ====
Index: perl/embed.fnc
--- perl/embed.fnc#589~33343~ 2008-02-21 16:20:45.000000000 -0800
+++ perl/embed.fnc 2008-02-27 04:29:36.000000000 -0800
@@ -1675,7 +1675,7 @@
Apn |int |my_socketpair |int family|int type|int protocol|int fd[2]
Ap |int |my_dirfd |NULLOK DIR* dir
#ifdef PERL_OLD_COPY_ON_WRITE
-pMXE |SV* |sv_setsv_cow |NN SV* dsv|NN SV* ssv
+pMXE |SV* |sv_setsv_cow |NN SV* dstr|NN SV* sstr
#endif
Aop |const char *|PerlIO_context_layers|NULLOK const char *mode
==== //depot/perl/proto.h#925 (text+w) ====
Index: perl/proto.h
--- perl/proto.h#924~33343~ 2008-02-21 16:20:45.000000000 -0800
+++ perl/proto.h 2008-02-27 04:29:36.000000000 -0800
@@ -5922,11 +5922,11 @@
PERL_CALLCONV int Perl_my_socketpair(int family, int type, int protocol,
int fd[2]);
PERL_CALLCONV int Perl_my_dirfd(pTHX_ DIR* dir);
#ifdef PERL_OLD_COPY_ON_WRITE
-PERL_CALLCONV SV* Perl_sv_setsv_cow(pTHX_ SV* dsv, SV* ssv)
+PERL_CALLCONV SV* Perl_sv_setsv_cow(pTHX_ SV* dstr, SV* sstr)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_SV_SETSV_COW \
- assert(dsv); assert(ssv)
+ assert(dstr); assert(sstr)
#endif
End of Patch.
