summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-04-21 03:42:21 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-04-21 03:42:21 +0000
commite3b8966e2a0e0357b86674327ee528dbb5f122a6 (patch)
treeea57e05a591964f3904bd50af9c6059668286fc1 /XSUB.h
parent3dfd1da1ac911ed5d5b4e3956b485ad9af14a10f (diff)
downloadperl-e3b8966e2a0e0357b86674327ee528dbb5f122a6.tar.gz
[asperl] add AS patch#17
p4raw-id: //depot/asperl@893
Diffstat (limited to 'XSUB.h')
-rw-r--r--XSUB.h6
1 files changed, 5 insertions, 1 deletions
diff --git a/XSUB.h b/XSUB.h
index f9c0503a39..a1041ad3ca 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -2,7 +2,7 @@
#ifdef CAN_PROTOTYPE
#ifdef PERL_OBJECT
-#define XS(name) void name(CPerlObj* pPerl, CV* cv)
+#define XS(name) void name(CV* cv, CPerlObj* pPerl)
#else
#define XS(name) void name(CV* cv)
#endif
@@ -75,4 +75,8 @@
#include "XSLock.h"
#endif /* WIN32 */
#endif /* NO_XSLOCKS */
+#else
+#ifdef PERL_CAPI
+#include "PerlCAPI.h"
+#endif
#endif /* PERL_OBJECT */