somewhat untested PERL_OBJECT cleanups (C++isms mostly

[perl5.git] / lib / ExtUtils / xsubpp

diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp
index 83ad03a..ac9ea74 100755 (executable)
--- a/lib/ExtUtils/xsubpp
+++ b/lib/ExtUtils/xsubpp
@@ -1320,7 +1320,7 @@ EOF
 if ($WantCAPI) { 
 print Q<<"EOF";
 ##ifdef PERL_CAPI
-##define XSCAPI(name) void name(CV* cv, void* pPerl)
+##define XSCAPI(name) void name(void *pPerl, CV* cv)
 #
 ##ifdef __cplusplus
 #extern "C"