Revision: 1077
Author: tim.bunce
Date: Sat Feb 20 08:49:23 2010
Log: Restore file format compatibility with previous release..

http://code.google.com/p/perl-devel-nytprof/source/detail?r=1077

Modified:
 /trunk/Changes
 /trunk/NYTProf.xs

=======================================
--- /trunk/Changes      Sat Feb 20 08:31:12 2010
+++ /trunk/Changes      Sat Feb 20 08:49:23 2010
@@ -13,7 +13,7 @@
 add "calls N subs" to treemap mouseover box
string eval merging - must allow at least viewing of source for called subs defined in a nested eval

-=head2 Changes in Devel::NYTProf 3.01_90 (svn 1076) 20th Feb 2010
+=head2 Changes in Devel::NYTProf 3.01_90 (svn 1077) 20th Feb 2010

   Fixed handling of usecputime=1 option and updated
     docs to note the significant limitations.
=======================================
--- /trunk/NYTProf.xs   Sat Feb 20 07:36:58 2010
+++ /trunk/NYTProf.xs   Sat Feb 20 08:49:23 2010
@@ -3264,6 +3264,8 @@
sc[NYTP_SCi_CALL_COUNT] = output_uv_from_av(aTHX_ av, NYTP_SCi_CALL_COUNT, 0) * 1.0; sc[NYTP_SCi_INCL_RTIME] = output_nv_from_av(aTHX_ av, NYTP_SCi_INCL_RTIME, 0.0); sc[NYTP_SCi_EXCL_RTIME] = output_nv_from_av(aTHX_ av, NYTP_SCi_EXCL_RTIME, 0.0);
+            output_nv(out, 0.0); /* NYTP_SCi_spare_3 */
+            output_nv(out, 0.0); /* NYTP_SCi_spare_4 */
sc[NYTP_SCi_RECI_RTIME] = output_nv_from_av(aTHX_ av, NYTP_SCi_RECI_RTIME, 0.0); sc[NYTP_SCi_REC_DEPTH] = output_uv_from_av(aTHX_ av, NYTP_SCi_REC_DEPTH , 0) * 1.0;
             output_str(out, called_subname, called_subname_len);
@@ -4037,10 +4039,15 @@
                 unsigned int count = read_int();
                 NV incl_time       = read_nv();
                 NV excl_time       = read_nv();
+                NV spare_3         = read_nv();
+                NV spare_4         = read_nv();
                 NV reci_time       = read_nv();
                 UV rec_depth       = read_int();
                 SV *called_subname_sv = read_str(aTHX_ tmp_str1_sv);

+                PERL_UNUSED_VAR(spare_3);
+                PERL_UNUSED_VAR(spare_4);
+
                 if (cb) {
                     PUSHMARK(SP);

--
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]

Reply via email to