From: gfx <gfuji@cpan.org>
Date: Thu, 26 Nov 2009 12:52:53 +0000 (+0900)
Subject: Remove an unused function: XS_Mouse_simple_accessor()
X-Git-Tag: 0.40_08~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f2dbeb5f05a2ff0bb63d422b5fea73554612ce87;p=gitmo%2FMouse.git

Remove an unused function: XS_Mouse_simple_accessor()
---

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;