← Index
NYTProf Performance Profile   « block view • line view • sub view »
For /usr/share/koha/opac/cgi-bin/opac/opac-search.pl
  Run on Tue Oct 15 11:58:52 2013
Reported on Tue Oct 15 12:01:31 2013

Filename/usr/lib/perl/5.10/Math/BigInt/FastCalc.pm
StatementsExecuted 58 statements in 715µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11111.3ms12.1msMath::BigInt::FastCalc::::BEGIN@8Math::BigInt::FastCalc::BEGIN@8
111139µs146µsMath::BigInt::FastCalc::::BEGIN@25Math::BigInt::FastCalc::BEGIN@25
11168µs68µsMath::BigInt::FastCalc::::BEGIN@3Math::BigInt::FastCalc::BEGIN@3
11164µs64µsMath::BigInt::FastCalc::::bootstrapMath::BigInt::FastCalc::bootstrap (xsub)
11117µs111µsMath::BigInt::FastCalc::::BEGIN@10Math::BigInt::FastCalc::BEGIN@10
11112µs12µsMath::BigInt::FastCalc::::BEGIN@7Math::BigInt::FastCalc::BEGIN@7
11112µs30µsMath::BigInt::FastCalc::::BEGIN@42Math::BigInt::FastCalc::BEGIN@42
11111µs11µsMath::BigInt::FastCalc::::_zeroMath::BigInt::FastCalc::_zero (xsub)
11111µs16µsMath::BigInt::FastCalc::::BEGIN@4Math::BigInt::FastCalc::BEGIN@4
1118µs14µsMath::BigInt::FastCalc::::importMath::BigInt::FastCalc::import
1118µs8µsMath::BigInt::FastCalc::::_newMath::BigInt::FastCalc::_new (xsub)
1116µs6µsMath::BigInt::FastCalc::::_set_XS_BASEMath::BigInt::FastCalc::_set_XS_BASE (xsub)
111900ns900nsMath::BigInt::FastCalc::::api_versionMath::BigInt::FastCalc::api_version (xsub)
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Math::BigInt::FastCalc;
2
3384µs168µs
# spent 68µs within Math::BigInt::FastCalc::BEGIN@3 which was called: # once (68µs+0s) by Math::BigInt::BEGIN@1 at line 3
use 5.006;
# spent 68µs making 1 call to Math::BigInt::FastCalc::BEGIN@3
4327µs221µs
# spent 16µs (11+5) within Math::BigInt::FastCalc::BEGIN@4 which was called: # once (11µs+5µs) by Math::BigInt::BEGIN@1 at line 4
use strict;
# spent 16µs making 1 call to Math::BigInt::FastCalc::BEGIN@4 # spent 5µs making 1 call to strict::import
5# use warnings; # dont use warnings for older Perls
6
7331µs112µs
# spent 12µs within Math::BigInt::FastCalc::BEGIN@7 which was called: # once (12µs+0s) by Math::BigInt::BEGIN@1 at line 7
use DynaLoader;
# spent 12µs making 1 call to Math::BigInt::FastCalc::BEGIN@7
83141µs212.1ms
# spent 12.1ms (11.3+828µs) within Math::BigInt::FastCalc::BEGIN@8 which was called: # once (11.3ms+828µs) by Math::BigInt::BEGIN@1 at line 8
use Math::BigInt::Calc;
# spent 12.1ms making 1 call to Math::BigInt::FastCalc::BEGIN@8 # spent 2µs making 1 call to Math::BigInt::Calc::import
9
103111µs2205µs
# spent 111µs (17+94) within Math::BigInt::FastCalc::BEGIN@10 which was called: # once (17µs+94µs) by Math::BigInt::BEGIN@1 at line 10
use vars qw/@ISA $VERSION $BASE $BASE_LEN/;
# spent 111µs making 1 call to Math::BigInt::FastCalc::BEGIN@10 # spent 94µs making 1 call to vars::import
11
12112µs@ISA = qw(DynaLoader);
13
141700ns$VERSION = '0.19';
15
1619µs1472µsbootstrap Math::BigInt::FastCalc $VERSION;
# spent 472µs making 1 call to DynaLoader::bootstrap
17
18##############################################################################
19# global constants, flags and accessory
20
21# announce that we are compatible with MBI v1.70 and up
22sub api_version () { 1; }
23
24BEGIN
25
# spent 146µs (139+7) within Math::BigInt::FastCalc::BEGIN@25 which was called: # once (139µs+7µs) by Math::BigInt::BEGIN@1 at line 51
{
26 # use Calc to override the methods that we do not provide in XS
27
28311µs for my $method (qw/
29 str
30 add sub mul div
31 rsft lsft
32 mod modpow modinv
33 gcd
34 pow root sqrt log_int fac nok
35 digit check
36 from_hex from_bin from_oct as_hex as_bin as_oct
37 zeros base_len
38 xor or and
39 alen 1ex
40 /)
41 {
42379µs248µs
# spent 30µs (12+18) within Math::BigInt::FastCalc::BEGIN@42 which was called: # once (12µs+18µs) by Math::BigInt::BEGIN@1 at line 42
no strict 'refs';
# spent 30µs making 1 call to Math::BigInt::FastCalc::BEGIN@42 # spent 18µs making 1 call to strict::unimport
4332121µs *{'Math::BigInt::FastCalc::_' . $method} = \&{'Math::BigInt::Calc::_' . $method};
44 }
45 my ($AND_BITS, $XOR_BITS, $OR_BITS, $BASE_LEN_SMALL, $MAX_VAL);
46
47 # store BASE_LEN and BASE to later pass it to XS code
4817µs ($BASE_LEN, $AND_BITS, $XOR_BITS, $OR_BITS, $BASE_LEN_SMALL, $MAX_VAL, $BASE) =
# spent 7µs making 1 call to Math::BigInt::Calc::_base_len
49 Math::BigInt::Calc::_base_len();
50
51167µs1146µs }
# spent 146µs making 1 call to Math::BigInt::FastCalc::BEGIN@25
52
53sub import
54
# spent 14µs (8+6) within Math::BigInt::FastCalc::import which was called: # once (8µs+6µs) by Math::BigInt::BEGIN@1 at line 1 of (eval 1006)[Math/BigInt.pm:2666]
{
55115µs16µs _set_XS_BASE($BASE, $BASE_LEN);
# spent 6µs making 1 call to Math::BigInt::FastCalc::_set_XS_BASE
56 }
57
58##############################################################################
59##############################################################################
60
6117µs1;
62__END__
 
# spent 8µs within Math::BigInt::FastCalc::_new which was called: # once (8µs+0s) by Math::BigInt::new at line 639 of Math/BigInt.pm
sub Math::BigInt::FastCalc::_new; # xsub
# spent 6µs within Math::BigInt::FastCalc::_set_XS_BASE which was called: # once (6µs+0s) by Math::BigInt::FastCalc::import at line 55
sub Math::BigInt::FastCalc::_set_XS_BASE; # xsub
# spent 11µs within Math::BigInt::FastCalc::_zero which was called: # once (11µs+0s) by Math::BigInt::new at line 586 of Math/BigInt.pm
sub Math::BigInt::FastCalc::_zero; # xsub
# spent 900ns within Math::BigInt::FastCalc::api_version which was called: # once (900ns+0s) by Math::BigInt::import at line 2672 of Math/BigInt.pm
sub Math::BigInt::FastCalc::api_version; # xsub
# spent 64µs within Math::BigInt::FastCalc::bootstrap which was called: # once (64µs+0s) by DynaLoader::bootstrap at line 215 of DynaLoader.pm
sub Math::BigInt::FastCalc::bootstrap; # xsub