From: gfx Date: Sun, 1 Nov 2009 03:50:27 +0000 (+0900) Subject: Checking in changes prior to tagging of version 0.40_04. Changelog diff is: X-Git-Tag: 0.40_04^0 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=commitdiff_plain;h=6a97bbdad44391f2a587165cb81fcf8aedc642ac Checking in changes prior to tagging of version 0.40_04. Changelog diff is: diff --git a/Changes b/Changes index 2efd6c6..5a4902c 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Mouse +0.40_04 + * Implement type constraint generators in XS + 0.40_03 Fri Oct 30 12:03:58 2009 * Update Module::Install::XSUtil to 0.15 --- diff --git a/Changes b/Changes index 2efd6c6..5a4902c 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Mouse +0.40_04 + * Implement type constraint generators in XS + 0.40_03 Fri Oct 30 12:03:58 2009 * Update Module::Install::XSUtil to 0.15 diff --git a/lib/Mouse.pm b/lib/Mouse.pm index bff08e5..0326532 100644 --- a/lib/Mouse.pm +++ b/lib/Mouse.pm @@ -3,7 +3,7 @@ use 5.006_002; use Mouse::Exporter; # enables strict and warnings -our $VERSION = '0.40_03'; +our $VERSION = '0.40_04'; use Carp qw(confess); use Scalar::Util qw(blessed); @@ -160,7 +160,7 @@ Mouse - Moose minus the antlers =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SYNOPSIS diff --git a/lib/Mouse/Exporter.pm b/lib/Mouse/Exporter.pm index 9f95612..9ac5661 100644 --- a/lib/Mouse/Exporter.pm +++ b/lib/Mouse/Exporter.pm @@ -258,7 +258,7 @@ Mouse::Exporter - make an import() and unimport() just like Mouse.pm =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SYNOPSIS diff --git a/lib/Mouse/Meta/Attribute.pm b/lib/Mouse/Meta/Attribute.pm index dc94eaa..28bdec3 100644 --- a/lib/Mouse/Meta/Attribute.pm +++ b/lib/Mouse/Meta/Attribute.pm @@ -435,7 +435,7 @@ Mouse::Meta::Attribute - The Mouse attribute metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 METHODS diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index 8e3693b..f621a36 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -479,7 +479,7 @@ Mouse::Meta::Class - The Mouse class metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 METHODS diff --git a/lib/Mouse/Meta/Method.pm b/lib/Mouse/Meta/Method.pm index 404d30d..8bbb944 100755 --- a/lib/Mouse/Meta/Method.pm +++ b/lib/Mouse/Meta/Method.pm @@ -39,7 +39,7 @@ Mouse::Meta::Method - A Mouse Method metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Method/Accessor.pm b/lib/Mouse/Meta/Method/Accessor.pm index 99c1e3d..11943ad 100755 --- a/lib/Mouse/Meta/Method/Accessor.pm +++ b/lib/Mouse/Meta/Method/Accessor.pm @@ -173,7 +173,7 @@ Mouse::Meta::Method::Accessor - A Mouse method generator for accessors =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Method/Constructor.pm b/lib/Mouse/Meta/Method/Constructor.pm index 6c238f8..607323d 100644 --- a/lib/Mouse/Meta/Method/Constructor.pm +++ b/lib/Mouse/Meta/Method/Constructor.pm @@ -193,7 +193,7 @@ Mouse::Meta::Method::Constructor - A Mouse method generator for constructors =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Method/Delegation.pm b/lib/Mouse/Meta/Method/Delegation.pm index d4d28dc..5a5c2cd 100644 --- a/lib/Mouse/Meta/Method/Delegation.pm +++ b/lib/Mouse/Meta/Method/Delegation.pm @@ -34,7 +34,7 @@ Mouse::Meta::Method::Delegation - A Mouse method generator for delegation method =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Method/Destructor.pm b/lib/Mouse/Meta/Method/Destructor.pm index e585ee3..df3d489 100644 --- a/lib/Mouse/Meta/Method/Destructor.pm +++ b/lib/Mouse/Meta/Method/Destructor.pm @@ -53,7 +53,7 @@ Mouse::Meta::Method::Destructor - A Mouse method generator for destructors =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Module.pm b/lib/Mouse/Meta/Module.pm index d83ea12..9cacd9b 100755 --- a/lib/Mouse/Meta/Module.pm +++ b/lib/Mouse/Meta/Module.pm @@ -290,7 +290,7 @@ Mouse::Meta::Module - The base class for Mouse::Meta::Class and Mouse::Meta::Rol =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Role.pm b/lib/Mouse/Meta/Role.pm index 9c1e994..c97376b 100644 --- a/lib/Mouse/Meta/Role.pm +++ b/lib/Mouse/Meta/Role.pm @@ -330,7 +330,7 @@ Mouse::Meta::Role - The Mouse Role metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Role/Composite.pm b/lib/Mouse/Meta/Role/Composite.pm index 77cdccd..e81b4e1 100644 --- a/lib/Mouse/Meta/Role/Composite.pm +++ b/lib/Mouse/Meta/Role/Composite.pm @@ -120,7 +120,7 @@ Mouse::Meta::Role::Composite - An object to represent the set of roles =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/Role/Method.pm b/lib/Mouse/Meta/Role/Method.pm index e2c00bb..e4ad503 100755 --- a/lib/Mouse/Meta/Role/Method.pm +++ b/lib/Mouse/Meta/Role/Method.pm @@ -20,7 +20,7 @@ Mouse::Meta::Role::Method - A Mouse Method metaclass for Roles =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Meta/TypeConstraint.pm b/lib/Mouse/Meta/TypeConstraint.pm index 155c48c..bfb2f99 100644 --- a/lib/Mouse/Meta/TypeConstraint.pm +++ b/lib/Mouse/Meta/TypeConstraint.pm @@ -210,7 +210,7 @@ Mouse::Meta::TypeConstraint - The Mouse Type Constraint metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 DESCRIPTION diff --git a/lib/Mouse/Object.pm b/lib/Mouse/Object.pm index bc158f7..4ff2ce7 100644 --- a/lib/Mouse/Object.pm +++ b/lib/Mouse/Object.pm @@ -89,7 +89,7 @@ Mouse::Object - The base object for Mouse classes =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 METHODS diff --git a/lib/Mouse/PurePerl.pm b/lib/Mouse/PurePerl.pm index 9b67e30..9c39b72 100644 --- a/lib/Mouse/PurePerl.pm +++ b/lib/Mouse/PurePerl.pm @@ -340,7 +340,7 @@ Mouse::PurePerl - A Mouse guts in pure Perl =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SEE ALSO diff --git a/lib/Mouse/Role.pm b/lib/Mouse/Role.pm index 4c56868..be99409 100644 --- a/lib/Mouse/Role.pm +++ b/lib/Mouse/Role.pm @@ -1,7 +1,7 @@ package Mouse::Role; use Mouse::Exporter; # enables strict and warnings -our $VERSION = '0.40_03'; +our $VERSION = '0.40_04'; use Carp qw(confess); use Scalar::Util qw(blessed); @@ -143,7 +143,7 @@ Mouse::Role - The Mouse Role =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SYNOPSIS diff --git a/lib/Mouse/Spec.pm b/lib/Mouse/Spec.pm index 89092c4..506e4e8 100644 --- a/lib/Mouse/Spec.pm +++ b/lib/Mouse/Spec.pm @@ -2,7 +2,7 @@ package Mouse::Spec; use strict; use warnings; -our $VERSION = '0.40_03'; +our $VERSION = '0.40_04'; our $MouseVersion = $VERSION; our $MooseVersion = '0.90'; @@ -19,7 +19,7 @@ Mouse::Spec - To what extent Mouse is compatible with Moose =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 SYNOPSIS diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm index 2674aeb..5f3df61 100644 --- a/lib/Mouse/Util.pm +++ b/lib/Mouse/Util.pm @@ -5,7 +5,7 @@ BEGIN{ # Because Mouse::Util is loaded first in all the Mouse sub-modules, # XS loader is placed here, not in Mouse.pm. - our $VERSION = '0.40_03'; + our $VERSION = '0.40_04'; my $need_pp = !!$ENV{MOUSE_PUREPERL}; @@ -334,7 +334,7 @@ Mouse::Util - Features, with or without their dependencies =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 IMPLEMENTATIONS FOR diff --git a/lib/Mouse/Util/TypeConstraints.pm b/lib/Mouse/Util/TypeConstraints.pm index 9658ca5..6393585 100644 --- a/lib/Mouse/Util/TypeConstraints.pm +++ b/lib/Mouse/Util/TypeConstraints.pm @@ -351,7 +351,7 @@ Mouse::Util::TypeConstraints - Type constraint system for Mouse =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head2 SYNOPSIS diff --git a/lib/Mouse/XS.pod b/lib/Mouse/XS.pod index 04b1359..c0aaa26 100644 --- a/lib/Mouse/XS.pod +++ b/lib/Mouse/XS.pod @@ -5,7 +5,7 @@ Mouse::XS - A Mouse guts in XS =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_04 =head1 DESCRIPTION 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;