From: Florian Ragwitz <rafl@debian.org>
Date: Sun, 15 Mar 2009 18:06:43 +0000 (+0100)
Subject: Stop redefining the prototype for XSUBs.
X-Git-Tag: 0.78_01~36
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1be561756ae40c4237d55ed010b5121762d473b0;p=gitmo%2FClass-MOP.git

Stop redefining the prototype for XSUBs.
---

diff --git a/mop.c b/mop.c
index 739f9d8..126568d 100644
--- a/mop.c
+++ b/mop.c
@@ -1,7 +1,7 @@
 #include "mop.h"
 
 void
-mop_call_xs (pTHX_ void (*subaddr) (pTHX_ CV *), CV *cv, SV **mark)
+mop_call_xs (pTHX_ XSPROTO(subaddr), CV *cv, SV **mark)
 {
     dSP;
     PUSHMARK(mark);
diff --git a/mop.h b/mop.h
index 1264f07..7566652 100644
--- a/mop.h
+++ b/mop.h
@@ -12,7 +12,7 @@
 
 #define MOP_CALL_BOOT(name)  mop_call_xs(aTHX_ name, cv, mark);
 
-void mop_call_xs (pTHX_ void (*subaddr) (pTHX_ CV *), CV *cv, SV **mark);
+void mop_call_xs (pTHX_ XSPROTO(subaddr), CV *cv, SV **mark);
 
 typedef enum {
     KEY_name,