From: Florian Ragwitz 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;hp=4052ab27cceac4e229d9feed3dd6d7a5955ac715;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,