use base qw(Class::MOP::Object);
-our $VERSION = '0.57';
+our $VERSION = '0.59';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
return @parents;
}
+sub create_childtype {
+ my ($self, %opts) = @_;
+ my $class = ref $self;
+ return $class->new(%opts, parent => $self);
+}
+
## this should get deprecated actually ...
sub union { Carp::croak "DEPRECATED" }
=item B<has_hand_optimized_type_constraint>
+=item B<create_childtype>
+
=back
=head2 DEPRECATED METHOD