X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs-src%2FMouseAccessor.xs;h=b9aad70d2bd84a07284e489f61cc3408b0dbc9b7;hb=f50e50d653ac9fbdc9aeeff13bbf5456e603a339;hp=5d6bcbf42fcf19e07a1df50e5e1aa4bf782e498b;hpb=2468f1d7c798da84418ca56ba71f69b6f921996d;p=gitmo%2FMouse.git diff --git a/xs-src/MouseAccessor.xs b/xs-src/MouseAccessor.xs index 5d6bcbf..b9aad70 100644 --- a/xs-src/MouseAccessor.xs +++ b/xs-src/MouseAccessor.xs @@ -245,30 +245,6 @@ mouse_simple_accessor_generate(pTHX_ const char* const fq_name, const char* cons return xsub; } -XS(XS_Mouse_simple_accessor) -{ - dVAR; dXSARGS; - dMOUSE_self; - MAGIC* const mg = (MAGIC*)XSANY.any_ptr; - SV* value; - - if(items == 1){ /* reader */ - value = get_slot(self, MOUSE_mg_slot(mg)); - if(!value){ - value = &PL_sv_undef; - } - } - else if(items == 2){ /* writer */ - value = set_slot(self, MOUSE_mg_slot(mg), ST(1)); - } - else { - croak("Expected exactly one or two argument for an accessor for '%"SVf"'", MOUSE_mg_slot(mg)); - } - - ST(0) = value; - XSRETURN(1); -} - XS(XS_Mouse_simple_reader) { dVAR; dXSARGS;