On Thu, Dec 11, 2008 at 02:34:14PM +0000, [email protected] wrote:
> 
> Author: tim.bunce
> Date: Thu Dec 11 05:57:10 2008
> New Revision: 651
> 
> Modified:
>     trunk/NYTProf.xs
> 
> Log:
> Start work on normalizing eval sequence numbers in file and sub names.
> Any volunteers to implement normalize_eval_seqn()?

Well, if someone implements the TODO tests, I can write the C.

But, right now, tests are failing:

t/20.runtests........ok 54/445                                               
#   Failed test 'test14.rdt match generated profile data'
#   at t/20.runtests.t line 221.
t/20.runtests........NOK 66/445#     Structures begin differing at:          
#          $got->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
#     '
#     $expected->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
#     '
--- test14.rdt  2008-12-11 19:22:11.000000000 +0000
+++ test14.rdt.new      2008-12-11 19:24:56.000000000 +0000
@@ -26,7 +26,7 @@
 fid_fileinfo   2       [ AutoLoader.pm   2 2 0 0 0 ]
 fid_fileinfo   2       sub     AutoLoader::AUTOLOAD    21-52
 fid_fileinfo   2       sub     AutoLoader::BEGIN       186-186
-fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
+fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
 fid_fileinfo   2       sub     AutoLoader::find_filename       54-126
 fid_fileinfo   2       sub     AutoLoader::import      128-181
 fid_fileinfo   2       sub     AutoLoader::unimport    183-193
t/20.runtests........ok 170/445                                              
#   Failed test 'test14.rdt match generated profile data'
#   at t/20.runtests.t line 221.
t/20.runtests........NOK 177/445#     Structures begin differing at:         
#          $got->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
#     '
#     $expected->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
#     '
--- test14.rdt  2008-12-11 19:22:11.000000000 +0000
+++ test14.rdt.new      2008-12-11 19:25:04.000000000 +0000
@@ -26,7 +26,7 @@
 fid_fileinfo   2       [ AutoLoader.pm   2 2 0 0 0 ]
 fid_fileinfo   2       sub     AutoLoader::AUTOLOAD    21-52
 fid_fileinfo   2       sub     AutoLoader::BEGIN       186-186
-fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
+fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
 fid_fileinfo   2       sub     AutoLoader::find_filename       54-126
 fid_fileinfo   2       sub     AutoLoader::import      128-181
 fid_fileinfo   2       sub     AutoLoader::unimport    183-193
t/20.runtests........ok 285/445                                              
#   Failed test 'test14.rdt match generated profile data'
#   at t/20.runtests.t line 221.
t/20.runtests........NOK 288/445#     Structures begin differing at:         
#          $got->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
#     '
#     $expected->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
#     '
--- test14.rdt  2008-12-11 19:22:11.000000000 +0000
+++ test14.rdt.new      2008-12-11 19:25:12.000000000 +0000
@@ -26,7 +26,7 @@
 fid_fileinfo   2       [ AutoLoader.pm   2 2 0 0 0 ]
 fid_fileinfo   2       sub     AutoLoader::AUTOLOAD    21-52
 fid_fileinfo   2       sub     AutoLoader::BEGIN       186-186
-fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
+fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
 fid_fileinfo   2       sub     AutoLoader::find_filename       54-126
 fid_fileinfo   2       sub     AutoLoader::import      128-181
 fid_fileinfo   2       sub     AutoLoader::unimport    183-193
t/20.runtests........ok 375/445                                              
#   Failed test 'test14.rdt match generated profile data'
#   at t/20.runtests.t line 221.
t/20.runtests........NOK 399/445#     Structures begin differing at:         
#          $got->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
#     '
#     $expected->[28] = 'fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
#     '
--- test14.rdt  2008-12-11 19:22:11.000000000 +0000
+++ test14.rdt.new      2008-12-11 19:25:19.000000000 +0000
@@ -26,7 +26,7 @@
 fid_fileinfo   2       [ AutoLoader.pm   2 2 0 0 0 ]
 fid_fileinfo   2       sub     AutoLoader::AUTOLOAD    21-52
 fid_fileinfo   2       sub     AutoLoader::BEGIN       186-186
-fid_fileinfo   2       sub     
AutoLoader::__ANON__[/usr/local/perl589/lib/5.8.9/AutoLoader.pm:31]     31-31
+fid_fileinfo   2       sub     
AutoLoader::__ANON__[/Users/nick/Sandpit/snap5.10.x-34928/lib/perl5/5.8.9/AutoLoader.pm:31]
     31-31
 fid_fileinfo   2       sub     AutoLoader::find_filename       54-126
 fid_fileinfo   2       sub     AutoLoader::import      128-181
 fid_fileinfo   2       sub     AutoLoader::unimport    183-193
t/20.runtests........ok 444/445# Looks like you failed 4 tests of 445.       
t/20.runtests........dubious                                                 
        Test returned status 4 (wstat 1024, 0x400)
DIED. FAILED tests 66, 177, 288, 399
        Failed 4/445 tests, 99.10% okay (less 20 skipped tests: 421 okay, 
94.61%)


[that's with a 5.8.9-RC2 or thereabouts. I think more fail with stock 5.8.8]

I assume that /usr/local/perl589 is on your machine. What's the correct fix?

Nicholas Clark

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