X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=mop.h;h=e30510d8ae3c70e6e19b11403746955597e6029a;hb=46fccbab1ce2ee3a115b69e05a383f42dbf78890;hp=1264f07d41bc99147ca99d900b41f8a01cf0727f;hpb=25bcd95ccda8967ac2d62842b9f99bad782ce0d4;p=gitmo%2FClass-MOP.git

diff --git a/mop.h b/mop.h
index 1264f07..e30510d 100644
--- a/mop.h
+++ b/mop.h
@@ -12,7 +12,11 @@
 
 #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);
+#ifndef XSPROTO
+#define XSPROTO(name) XS(name)
+#endif
+
+void mop_call_xs (pTHX_ XSPROTO(subaddr), CV *cv, SV **mark);
 
 typedef enum {
     KEY_name,
@@ -23,6 +27,7 @@ typedef enum {
     KEY_methods,
     KEY_VERSION,
     KEY_ISA,
+    KEY__version,
     key_last,
 } mop_prehashed_key_t;