From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 7 Jun 2000 01:05:23 +0000 (+0000)
Subject: Regen headers for #6207.
X-Git-Tag: perl-5.7.0~647^2~4
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/20c3fafb04ffffa6dc18ae6b0f4092a393efdc4f

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