X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouse.xs;h=7391db03e5910a7ddeb9f3419843716016134dc9;hp=451e9f4fd63308c5c9331369751857884ae0a17d;hb=refs%2Ftags%2F0.40_04;hpb=8fa5f9b88713d63f037557b55d8f0811f0531f21 diff --git a/xs-src/Mouse.xs b/xs-src/Mouse.xs index 451e9f4..7391db0 100644 --- a/xs-src/Mouse.xs +++ b/xs-src/Mouse.xs @@ -31,7 +31,7 @@ HV* namespace(SV* self) CODE: { - SV* const package = get_slot(aTHX_ self, mouse_package); + SV* const package = get_slot(self, mouse_package); if(!(package && SvOK(package))){ croak("No package name defined"); } @@ -45,8 +45,8 @@ void add_method(SV* self, SV* name, SV* code, ...) CODE: { - SV* const package = get_slot(aTHX_ self, mouse_package); /* $self->{package} */ - SV* const methods = get_slot(aTHX_ self, mouse_methods); /* $self->{methods} */ + SV* const package = get_slot(self, mouse_package); /* $self->{package} */ + SV* const methods = get_slot(self, mouse_methods); /* $self->{methods} */ GV* gv; SV* code_ref;