sub should_auto_deref { $_[0]->{auto_deref} }
sub should_coerce { $_[0]->{coerce} }
+sub documentation { $_[0]->{documentation} }
+
# predicates
sub has_accessor { exists $_[0]->{accessor} }
sub has_trigger { exists $_[0]->{trigger} }
sub has_builder { exists $_[0]->{builder} }
+sub has_documentation { exists $_[0]->{documentation} }
+
+sub accessor_metaclass(){ 'Mouse::Meta::Method::Accessor' }
+
package
Mouse::Meta::TypeConstraint;
sub _compiled_type_constraint{ $_[0]->{compiled_type_constraint} }
-sub has_coercion{ exists $_[0]->{_compiled_type_coercion} }
+sub _compiled_type_coercion { $_[0]->{_compiled_type_coercion} }
-package
- Mouse::Meta::Method::Accessor;
+
+sub has_coercion{ exists $_[0]->{_compiled_type_coercion} }
1;
__END__