Revision: 1345
Author: [email protected]
Date: Sun Sep 12 05:01:13 2010
Log: Prep for 4.05 release.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1345
Modified:
/trunk/NYTProf.xs
/trunk/bin/nytprofhtml
/trunk/bin/nytprofmerge
/trunk/lib/Devel/NYTProf/Core.pm
/trunk/lib/Devel/NYTProf.pm
=======================================
--- /trunk/NYTProf.xs Sun Sep 12 04:12:04 2010
+++ /trunk/NYTProf.xs Sun Sep 12 05:01:13 2010
@@ -3350,7 +3350,7 @@
caller_subname_len = (I32)(fid_line_start-caller_subname);
/* catch negative line numbers that have been stored unsigned
*/
- if (line > 2147483648) { /* 2**31 */
+ if (line > 2147483600) { /* ~2**31 */
logwarn("%s called by %.*s at fid %u line %u - crazy line
number changed to 0\n",
called_subname, (int)caller_subname_len,
caller_subname, fid, line);
line = 0;
=======================================
--- /trunk/bin/nytprofhtml Sun Sep 12 04:13:23 2010
+++ /trunk/bin/nytprofhtml Sun Sep 12 05:01:13 2010
@@ -43,7 +43,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 = '4.04';
+our $VERSION = '4.05';
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 Thu Jul 8 07:10:06 2010
+++ /trunk/bin/nytprofmerge Sun Sep 12 05:01:13 2010
@@ -18,7 +18,7 @@
require Devel::NYTProf::Data;
use List::Util qw(min);
-our $VERSION = '4.04';
+our $VERSION = '4.05';
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/Core.pm Thu Jul 8 07:10:06 2010
+++ /trunk/lib/Devel/NYTProf/Core.pm Sun Sep 12 05:01:13 2010
@@ -14,7 +14,7 @@
use XSLoader;
-our $VERSION = '4.04'; # increment with XS changes too
+our $VERSION = '4.05'; # increment with XS changes too
XSLoader::load('Devel::NYTProf', $VERSION);
=======================================
--- /trunk/lib/Devel/NYTProf.pm Thu Jul 8 07:10:06 2010
+++ /trunk/lib/Devel/NYTProf.pm Sun Sep 12 05:01:13 2010
@@ -11,7 +11,7 @@
###########################################################
package Devel::NYTProf;
-our $VERSION = '4.04';
+our $VERSION = '4.05';
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]