Filename	/home/doy/nytprof/markdent/accessor genitor defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/MooseX/Role/Parameterized/Meta/Trait/Parameterized.pm
Statements	Executed 1 statements in 28µs

Subroutines

Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
0	0	0	0s	0s	Class::MOP::Method::Generated::::__ANON__[accessor genitor defined at MooseX/Role/Parameterized/Meta/Trait/Parameterized.pm:8]Class::MOP::Method::Generated::__ANON__[accessor genitor defined at MooseX/Role/Parameterized/Meta/Trait/Parameterized.pm:8]

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					my $type_constraint = ${$__captures->{'$type_constraint'}};
2					my $type_constraint_obj = ${$__captures->{'$type_constraint_obj'}};
3					my $meta = ${$__captures->{'$meta'}};
4					my $attr = ${$__captures->{'$attr'}};
5					#line 8 "accessor genitor defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/MooseX/Role/Parameterized/Meta/Trait/Parameterized.pm"
6					sub {$meta->throw_error("Cannot assign a value to a read-only accessor", data => \@_) if @_ > 1;return $_[0]->{"genitor"};}
7					;
8
9	1	28µs