Remove tr///CU (the feature is to be obsoleted by better interfaces).

[p5sagit/p5-mst-13.2.git] / objXSUB.h

diff --git a/objXSUB.h b/objXSUB.h
index 25536e9..23077d4 100644 (file)
--- 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