[padb-devel] [padb] r208 committed - if ( 0 ) out the debug code from make_tree, it was increasing the runt...
codesite-noreply at google.com
codesite-noreply at google.com
Tue Sep 8 19:42:14 BST 2009
Revision: 208
Author: apittman
Date: Tue Sep 8 11:40:20 2009
Log: if ( 0 ) out the debug code from make_tree, it was increasing the
runtime required by a factor of three!
http://code.google.com/p/padb/source/detail?r=208
Modified:
/branches/cleanup/src/padb
=======================================
--- /branches/cleanup/src/padb Tue Sep 8 11:37:33 2009
+++ /branches/cleanup/src/padb Tue Sep 8 11:40:20 2009
@@ -1916,8 +1916,10 @@
my $prev;
my $tag = rng_shift($trange);
- debug_log( 'tree', undef, 'called tag:%s, level:%d tags %s',
- $tag, $level, rng_convert_to_user($trange) );
+ if (0) {
+ debug_log( 'tree', undef, 'called tag:%s, level:%d tags %s',
+ $tag, $level, rng_convert_to_user($trange) );
+ }
return if ( not defined $tag );
return if ( not defined $lines->{$tag} );
@@ -1970,13 +1972,15 @@
$endlevel = ( $#{ $lines->{$tag} } );
}
- debug_log(
- 'tree',
- undef,
- "level $level, endlevel $endlevel, identical:%s different: %s",
- rng_convert_to_user( rng_create_from_array(@identical) ),
- rng_convert_to_user($different_rng)
- );
+ if (0) {
+ debug_log(
+ 'tree',
+ undef,
+ "level $level, endlevel $endlevel, identical:%s different: %s",
+ rng_convert_to_user( rng_create_from_array(@identical) ),
+ rng_convert_to_user($different_rng)
+ );
+ }
for ( my $l = $level ; $l <= $endlevel ; $l++ ) {
@@ -2011,13 +2015,15 @@
$prev->{children} = _make_tree( $endlevel + 1, $lines, $r );
}
- debug_log(
- 'tree',
- undef,
- "returning level:$level endlevel:$endlevel identical:%s
different: %s",
- rng_convert_to_user( rng_create_from_array(@identical) ),
- rng_convert_to_user($different_rng)
- );
+ if (0) {
+ debug_log(
+ 'tree',
+ undef,
+"returning level:$level endlevel:$endlevel identical:%s different: %s",
+ rng_convert_to_user( rng_create_from_array(@identical) ),
+ rng_convert_to_user($different_rng)
+ );
+ }
if ( not rng_empty($different_rng) ) {
my $new = _make_tree( $level, $lines, $different_rng );
More information about the padb-devel
mailing list