From: Jarkko Hietaniemi Date: Wed, 7 Jun 2000 01:05:23 +0000 (+0000) Subject: Regen headers for #6207. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=20c3fafb04ffffa6dc18ae6b0f4092a393efdc4f;p=p5sagit%2Fp5-mst-13.2.git Regen headers for #6207. p4raw-id: //depot/cfgperl@6208 --- diff --git a/embed.h b/embed.h index 33ef720..7cc8e63 100644 --- a/embed.h +++ b/embed.h @@ -1128,6 +1128,7 @@ #define xstat S_xstat # endif #endif +#define lock Perl_lock #if defined(PERL_OBJECT) #endif #define ck_anoncode Perl_ck_anoncode @@ -2568,6 +2569,7 @@ #define xstat(a) S_xstat(aTHX_ a) # endif #endif +#define lock(a) Perl_lock(aTHX_ a) #if defined(PERL_OBJECT) #endif #define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a) @@ -4982,6 +4984,8 @@ #define xstat S_xstat # endif #endif +#define Perl_lock CPerlObj::Perl_lock +#define lock Perl_lock #if defined(PERL_OBJECT) #endif #define Perl_ck_anoncode CPerlObj::Perl_ck_anoncode diff --git a/objXSUB.h b/objXSUB.h index 25536e9..23077d4 100644 --- a/objXSUB.h +++ b/objXSUB.h @@ -2257,6 +2257,10 @@ # if defined(LEAKTEST) # endif #endif +#undef Perl_lock +#define Perl_lock pPerl->Perl_lock +#undef lock +#define lock Perl_lock #if defined(PERL_OBJECT) #endif