Author: gisle.aas
Date: Wed Oct 29 14:21:58 2008
New Revision: 573
Modified:
trunk/NYTProf.xs
Log:
The timestamps in TAG_PID_{START,END} are NV
Modified: trunk/NYTProf.xs
==============================================================================
--- trunk/NYTProf.xs (original)
+++ trunk/NYTProf.xs Wed Oct 29 14:21:58 2008
@@ -3194,7 +3194,7 @@
sv_setuv(cb_args[i], pid); XPUSHs(cb_args[i++]);
sv_setuv(cb_args[i], ppid); XPUSHs(cb_args[i++]);
if (file_minor >= 1) {
- sv_setuv(cb_args[i], profiler_start_time);
XPUSHs(cb_args[i++]);
+ sv_setnv(cb_args[i], profiler_start_time);
XPUSHs(cb_args[i++]);
}
PUTBACK;
@@ -3226,7 +3226,7 @@
sv_setpvs(cb_args[i], "PID_END"); XPUSHs(cb_args[i++]);
sv_setuv(cb_args[i], pid); XPUSHs(cb_args[i++]);
if (file_minor >= 1) {
- sv_setuv(cb_args[i], profiler_end_time);
XPUSHs(cb_args[i++]);
+ sv_setnv(cb_args[i], profiler_end_time);
XPUSHs(cb_args[i++]);
}
PUTBACK;
--~--~---------~--~----~------------~-------~--~----~
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]
-~----------~----~----~----~------~----~------~--~---
