← Index
NYTProf Performance Profile   « block view • line view • sub view »
For -e
  Run on Wed Nov 17 21:45:08 2010
Reported on Wed Nov 17 22:12:11 2010

Filename/home/doy/nytprof/markdent/accessor _set_list_level of attribute _list_level defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Markdent/Dialect/Standard/BlockParser.pm
StatementsExecuted 1 statements in 28µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
0000s0sClass::MOP::Method::Generated::::__ANON__[accessor _set_list_level of attribute _list_level defined at Markdent/Dialect/Standard/BlockParser.pm:51]Class::MOP::Method::Generated::__ANON__[accessor _set_list_level of attribute _list_level defined at Markdent/Dialect/Standard/BlockParser.pm:51]
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1my $type_constraint = ${$__captures->{'$type_constraint'}};
2my $type_constraint_obj = ${$__captures->{'$type_constraint_obj'}};
3my $meta = ${$__captures->{'$meta'}};
4my $attr = ${$__captures->{'$attr'}};
5#line 50 "accessor _set_list_level of attribute _list_level defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Markdent/Dialect/Standard/BlockParser.pm"
6sub { $type_constraint->($_[1]) || $meta->throw_error("Attribute (_list_level) does not pass the type constraint because: " . $type_constraint_obj->get_message($_[1]), data => $_[1]);
7$_[0]->{"_list_level"} = $_[1]; }
8;
9
- -
50
- -
52128µs