support bytecode and C backends in perlcc (patch suggested

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

diff --git a/XSUB.h b/XSUB.h
index 76b9f10..241ac40 100644 (file)
--- a/XSUB.h
+++ b/XSUB.h
@@ -118,10 +118,8 @@
 #if defined(PERL_IMPLICIT_CONTEXT) && !defined(PERL_NO_GET_CONTEXT) && !defined(PERL_CORE)
 #  undef aTHX
 #  undef aTHX_
-#  undef _aTHX
 #  define aTHX         PERL_GET_THX
 #  define aTHX_                aTHX,
-#  define _aTHX                ,aTHX
 #endif
 
 #if defined(PERL_CAPI)