use Scalar::Util 'blessed';
use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterizable;
-our $VERSION = '0.57';
+our $VERSION = '0.65';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
. $self->parent->name . " doesn't subtype or coerce from a parameterizable type.");
}
+sub create_child_type {
+ my ($self, %opts) = @_;
+ return Moose::Meta::TypeConstraint::Parameterizable->new(%opts, parent=>$self);
+}
+
1;
__END__
=item B<equals>
+=item B<create_child_type>
+
=back
=head1 BUGS