X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=mouse.h;h=9974f816d8caf7069beb266383abad6aaa8d4909;hp=2b75762e84fb2dc2ceebe33030981f8571eb56d3;hb=6fe2272b04003d989c299dae495c4c6f9730dabc;hpb=dfbc05003792a24ba9d4212c49c63f437e519119 diff --git a/mouse.h b/mouse.h index 2b75762..9974f81 100644 --- a/mouse.h +++ b/mouse.h @@ -104,10 +104,12 @@ void mouse_instance_weaken_slot(pTHX_ SV* const instance, SV* const slot); #define has_slot(self, key) mouse_instance_has_slot(aTHX_ self, key) #define get_slot(self, key) mouse_instance_get_slot(aTHX_ self, key) #define set_slot(self, key, value) mouse_instance_set_slot(aTHX_ self, key, value) +#define delete_slot(self, key) mouse_instance_delete_slot(aTHX_ self, key) +#define weaken_slot(self, key) mouse_instance_weaken_slot(aTHX_ self, key) -#define has_slots(self, key) mouse_instance_has_slot(aTHX_ self, sv_2mortal(newSVpvs_share(key))) -#define get_slots(self, key) mouse_instance_get_slot(aTHX_ self, sv_2mortal(newSVpvs_share(key))) -#define set_slots(self, key, value) mouse_instance_set_slot(aTHX_ self, sv_2mortal(newSVpvs_share(key)), value) +#define has_slots(self, key) has_slot(self, sv_2mortal(newSVpvs_share(key))) +#define get_slots(self, key) get_slot(self, sv_2mortal(newSVpvs_share(key))) +#define set_slots(self, key, value) set_slot(self, sv_2mortal(newSVpvs_share(key)), value) /* mouse_simle_accessor.xs */ #define INSTALL_SIMPLE_READER(klass, name) INSTALL_SIMPLE_READER_WITH_KEY(klass, name, name)