Revision: 1253
Author: [email protected]
Date: Sun May 30 01:30:17 2010
Log: Prep for 4.00, finally!
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1253
Modified:
/trunk/Changes
/trunk/bin/nytprofcsv
/trunk/bin/nytprofhtml
/trunk/bin/nytprofmerge
/trunk/lib/Devel/NYTProf/Apache.pm
/trunk/lib/Devel/NYTProf/Core.pm
/trunk/lib/Devel/NYTProf/Data.pm
/trunk/lib/Devel/NYTProf/ReadStream.pm
/trunk/lib/Devel/NYTProf/Reader.pm
/trunk/lib/Devel/NYTProf/Util.pm
/trunk/lib/Devel/NYTProf.pm
=======================================
--- /trunk/Changes Sun May 30 01:17:44 2010
+++ /trunk/Changes Sun May 30 01:30:17 2010
@@ -11,12 +11,10 @@
subroutine profiler docs need update
add u key to treemap to trigger moving 'up' a level
add "calls N subs" to treemap mouseover box
-
-=head2 Changes in Devel::NYTProf 3.12 (svn 1194) 22nd April 2010
-
-XXX TODO
On eval report add links to sibling eval reports
+=head2 Changes in Devel::NYTProf 4.00 (svn 1253) 30th May 2010
+
Major changes:
Added profile reporting of code executed in string evals.
=======================================
--- /trunk/bin/nytprofcsv Mon Apr 5 16:22:16 2010
+++ /trunk/bin/nytprofcsv Sun May 30 01:30:17 2010
@@ -18,7 +18,7 @@
use Devel::NYTProf::Reader;
-our $VERSION = '3.11';
+our $VERSION = '4.00';
use constant NUMERIC_PRECISION => 5;
=======================================
--- /trunk/bin/nytprofhtml Thu May 27 02:40:28 2010
+++ /trunk/bin/nytprofhtml Sun May 30 01:30:17 2010
@@ -31,7 +31,7 @@
my $json_any = eval { require JSON::Any; JSON::Any->import; JSON::Any->new
}
or warn "Can't load JSON::Any module - HTML visualizations skipped.\n";
-our $VERSION = '3.11';
+our $VERSION = '4.00';
if ($VERSION != $Devel::NYTProf::Core::VERSION) {
die "$0 version '$VERSION' doesn't match
version '$Devel::NYTProf::Core::VERSION' of
$INC{'Devel/NYTProf/Core.pm'}\n";
=======================================
--- /trunk/bin/nytprofmerge Tue Mar 9 02:35:10 2010
+++ /trunk/bin/nytprofmerge Sun May 30 01:30:17 2010
@@ -18,7 +18,7 @@
require Devel::NYTProf::Data;
use List::Util qw(min);
-our $VERSION = '3.11';
+our $VERSION = '4.00';
if ($VERSION != $Devel::NYTProf::Core::VERSION) {
die "$0 version '$VERSION' doesn't match
version '$Devel::NYTProf::Core::VERSION' of
$INC{'Devel/NYTProf/Core.pm'}\n";
=======================================
--- /trunk/lib/Devel/NYTProf/Apache.pm Wed May 26 10:35:13 2010
+++ /trunk/lib/Devel/NYTProf/Apache.pm Sun May 30 01:30:17 2010
@@ -11,7 +11,7 @@
###########################################################
package Devel::NYTProf::Apache;
-our $VERSION = '3.11';
+our $VERSION = '4.00';
BEGIN {
=======================================
--- /trunk/lib/Devel/NYTProf/Core.pm Thu Apr 22 03:23:05 2010
+++ /trunk/lib/Devel/NYTProf/Core.pm Sun May 30 01:30:17 2010
@@ -14,7 +14,7 @@
use XSLoader;
-our $VERSION = '3.11'; # increment with XS changes too
+our $VERSION = '4.00'; # increment with XS changes too
XSLoader::load('Devel::NYTProf', $VERSION);
=======================================
--- /trunk/lib/Devel/NYTProf/Data.pm Sun May 30 01:17:44 2010
+++ /trunk/lib/Devel/NYTProf/Data.pm Sun May 30 01:30:17 2010
@@ -52,7 +52,7 @@
use Devel::NYTProf::SubInfo;
use Devel::NYTProf::Util qw(make_path_strip_editor strip_prefix_from_paths
get_abs_paths_alternation_regex);
-our $VERSION = '3.11';
+our $VERSION = '4.00';
my $trace = (($ENV{NYTPROF}||'') =~ m/\b trace=(\d+) /x) && $1; # XXX a
hack
=======================================
--- /trunk/lib/Devel/NYTProf/ReadStream.pm Tue Mar 9 02:35:10 2010
+++ /trunk/lib/Devel/NYTProf/ReadStream.pm Sun May 30 01:30:17 2010
@@ -3,7 +3,7 @@
use warnings;
use strict;
-our $VERSION = '3.11';
+our $VERSION = '4.00';
use base 'Exporter';
our @EXPORT_OK = qw(
=======================================
--- /trunk/lib/Devel/NYTProf/Reader.pm Thu May 27 06:53:15 2010
+++ /trunk/lib/Devel/NYTProf/Reader.pm Sun May 30 01:30:17 2010
@@ -11,7 +11,7 @@
###########################################################
package Devel::NYTProf::Reader;
-our $VERSION = '3.11';
+our $VERSION = '4.00';
use warnings;
use strict;
=======================================
--- /trunk/lib/Devel/NYTProf/Util.pm Tue Mar 9 02:35:10 2010
+++ /trunk/lib/Devel/NYTProf/Util.pm Sun May 30 01:30:17 2010
@@ -38,9 +38,8 @@
use Carp;
use Cwd qw(getcwd);
use List::Util qw(sum);
-#use UNIVERSAL qw( isa can VERSION );
-
-our $VERSION = '3.11';
+
+our $VERSION = '4.00';
our @EXPORT_OK = qw(
fmt_float
=======================================
--- /trunk/lib/Devel/NYTProf.pm Wed May 26 15:02:12 2010
+++ /trunk/lib/Devel/NYTProf.pm Sun May 30 01:30:17 2010
@@ -11,7 +11,7 @@
###########################################################
package Devel::NYTProf;
-our $VERSION = '3.11';
+our $VERSION = '4.00';
package # hide the package from the PAUSE indexer
DB;
--
You've received this message because you are subscribed to
the Devel::NYTProf Development User group.
Group hosted at: http://groups.google.com/group/develnytprof-dev
Project hosted at: http://perl-devel-nytprof.googlecode.com
CPAN distribution: http://search.cpan.org/dist/Devel-NYTProf
To post, email: [email protected]
To unsubscribe, email: [email protected]