Revision: 1043
Author: [email protected]
Date: Fri Feb 5 09:56:49 2010
Log: Fix an off-by-two error in normalize_eval_seqn() introduced by r1018.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1043
Modified:
/trunk/NYTProf.xs
=======================================
--- /trunk/NYTProf.xs Fri Feb 5 09:56:45 2010
+++ /trunk/NYTProf.xs Fri Feb 5 09:56:49 2010
@@ -3446,7 +3446,7 @@
/* Assumption is that space is the least common character in a
filename. */
for (; len >= 8 && (first_space = memchr(start, ' ', len));
- (len -= first_space - start - 1), (start = first_space + 1)) {
+ (len -= first_space +1 - start), (start = first_space + 1)) {
char *first_digit;
char *close;
--
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]
