Profile of accessor _set_buffer of attribute _buffer (defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/KiokuDB/Collapser.pm line 59)

Filename	/home/doy/nytprof/kioku-new/accessor _set_buffer of attribute _buffer (defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/KiokuDB/Collapser.pm line 59)
Statements	Executed 2 statements in 44µs

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	27µs	27µs	Eval::Closure::__ANON__[accessor _set_buffer of attribute _buffer (defined at KiokuDB/Collapser.pm line 59):7]
0	0	0	0s	0s	Eval::Closure::__ANON__[accessor _set_buffer of attribute _buffer (defined at KiokuDB/Collapser.pm line 59):6]

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

Line	State ments	Time on line	Code
1			# spent 27µs within Eval::Closure::__ANON__[accessor _set_buffer of attribute _buffer (defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/KiokuDB/Collapser.pm line 59):7] which was called: # once (27µs+0s) by Eval::Closure::_clean_eval_closure at line 94 of Eval/Closure.pm sub {
2			my $attr = ${$_[0]};
3			my $meta = ${$_[1]};
4			my $type_constraint = ${$_[2]};
5			my $type_constraint_obj = ${$_[3]};
6			#line 1 "accessor _set_buffer of attribute _buffer (defined at /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/KiokuDB/Collapser.pm line 59)"
7	1	25µs	sub {
8	1	19µs	if (!$type_constraint->($_[1])) {
9			$meta->throw_error("Attribute (_buffer) does not pass the type constraint because: " . $type_constraint_obj->get_message($_[1]), data => $_[1]);
10			}
11			$_[0]->{"_buffer"} = $_[1];
12			}
13			}
14			;