X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.h;h=42ca535100b7d7fe71feadac505e35a0554f073c;hb=918426be7f3660c63cebe082bf8eac82a38bf756;hp=a101d236f853ffb15fd039844fc69e757ff05464;hpb=4030fe4ad6ddcf55e0341ef163ebb1419014d565;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/embed.h b/embed.h
index a101d23..42ca535 100644
--- a/embed.h
+++ b/embed.h
@@ -1164,9 +1164,6 @@
 #  if defined(LEAKTEST)
 #define xstat			S_xstat
 #  endif
-#  if defined(EBCDIC)
-#define ebcdic_control		Perl_ebcdic_control
-#  endif
 #endif
 #if defined(PERL_OBJECT)
 #endif
@@ -2646,9 +2643,6 @@
 #  if defined(LEAKTEST)
 #define xstat(a)		S_xstat(aTHX_ a)
 #  endif
-#  if defined(EBCDIC)
-#define ebcdic_control(a)	Perl_ebcdic_control(aTHX_ a)
-#  endif
 #endif
 #if defined(PERL_OBJECT)
 #endif
@@ -5134,10 +5128,6 @@
 #define S_xstat			CPerlObj::S_xstat
 #define xstat			S_xstat
 #  endif
-#  if defined(EBCDIC)
-#define Perl_ebcdic_control	CPerlObj::Perl_ebcdic_control
-#define ebcdic_control		Perl_ebcdic_control
-#  endif
 #endif
 #if defined(PERL_OBJECT)
 #endif