Revision: 1216
Author: [email protected]
Date: Thu May 6 15:40:47 2010
Log: Changed test24-strevalc.p so it's not sensitive to the leave option.
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1216
Modified:
/trunk/t/test24-strevalc.p
/trunk/t/test24-strevalc.rdt
=======================================
--- /trunk/t/test24-strevalc.p Mon Apr 26 05:45:51 2010
+++ /trunk/t/test24-strevalc.p Thu May 6 15:40:47 2010
@@ -1,7 +1,9 @@
# test 'collapsing' of string evals
my @src = (
- (("1") x 2),
- (("eval '1'") x 2),
+ (("1+1") x 2),
+ (("eval '1+1'") x 2),
(("sub { 1 }->()") x 2),
);
-eval $_ for @src;
+for my $src (@src) {
+ eval $src;
+}
=======================================
--- /trunk/t/test24-strevalc.rdt Tue May 4 03:48:10 2010
+++ /trunk/t/test24-strevalc.rdt Thu May 6 15:40:47 2010
@@ -14,7 +14,8 @@
attribute total_sub_calls 0
attribute xs_version 0
fid_block_time 1 2 [ 0 1 ]
-fid_block_time 1 7 [ 0 2 ]
+fid_block_time 1 7 [ 0 1 ]
+fid_block_time 1 8 [ 0 6 ]
fid_block_time 2 1 [ 0 1 ]
fid_block_time 4 1 [ 0 1 ]
fid_block_time 5 1 [ 0 1 ]
@@ -25,22 +26,23 @@
fid_fileinfo 1 [ test24-strevalc.p 1 2 0 0 ]
fid_fileinfo 1 sub main::BEGIN 0-0
fid_fileinfo 1 sub main::RUNTIME 1-1
-fid_fileinfo 1 eval 7 [ count 5 nested 2 merged 1 ]
-fid_fileinfo 2 [ (eval 1)[test24-strevalc.p:7] 1 7 2 2 0 0 ]
-fid_fileinfo 4 [ (eval 3)[test24-strevalc.p:7] 1 7 4 2 0 0 ]
+fid_fileinfo 1 eval 8 [ count 5 nested 2 merged 1 ]
+fid_fileinfo 2 [ (eval 1)[test24-strevalc.p:8] 1 8 2 2 0 0 ]
+fid_fileinfo 4 [ (eval 3)[test24-strevalc.p:8] 1 8 4 2 0 0 ]
fid_fileinfo 4 eval 1 [ count 1 nested 0 merged 0 ]
-fid_fileinfo 5 [ (eval 4)[(eval 3)[test24-strevalc.p:7]:1] 4 1 5 2 0 0
]
-fid_fileinfo 6 [ (eval 5)[test24-strevalc.p:7] 1 7 6 2 0 0 ]
+fid_fileinfo 5 [ (eval 4)[(eval 3)[test24-strevalc.p:8]:1] 4 1 5 2 0 0
]
+fid_fileinfo 6 [ (eval 5)[test24-strevalc.p:8] 1 8 6 2 0 0 ]
fid_fileinfo 6 eval 1 [ count 1 nested 0 merged 0 ]
-fid_fileinfo 7 [ (eval 6)[(eval 5)[test24-strevalc.p:7]:1] 6 1 7 2 0 0
]
-fid_fileinfo 8 [ (eval 7)[test24-strevalc.p:7] 1 7 8 2 0 0 ]
-fid_fileinfo 8 sub main::__ANON__[(eval 7)[test24-strevalc.p:7]:1]
1-1
-fid_fileinfo 8 call 1 main::__ANON__[(eval 7)[test24-strevalc.p:7]:1] [ 1
0 0 0 0 0 0 main::RUNTIME ]
-fid_fileinfo 9 [ (eval 8)[test24-strevalc.p:7] 1 7 9 2 0 0 ]
-fid_fileinfo 9 sub main::__ANON__[(eval 8)[test24-strevalc.p:7]:1]
1-1
-fid_fileinfo 9 call 1 main::__ANON__[(eval 8)[test24-strevalc.p:7]:1] [ 1
0 0 0 0 0 0 main::RUNTIME ]
+fid_fileinfo 7 [ (eval 6)[(eval 5)[test24-strevalc.p:8]:1] 6 1 7 2 0 0
]
+fid_fileinfo 8 [ (eval 7)[test24-strevalc.p:8] 1 8 8 2 0 0 ]
+fid_fileinfo 8 sub main::__ANON__[(eval 7)[test24-strevalc.p:8]:1]
1-1
+fid_fileinfo 8 call 1 main::__ANON__[(eval 7)[test24-strevalc.p:8]:1] [ 1
0 0 0 0 0 0 main::RUNTIME ]
+fid_fileinfo 9 [ (eval 8)[test24-strevalc.p:8] 1 8 9 2 0 0 ]
+fid_fileinfo 9 sub main::__ANON__[(eval 8)[test24-strevalc.p:8]:1]
1-1
+fid_fileinfo 9 call 1 main::__ANON__[(eval 8)[test24-strevalc.p:8]:1] [ 1
0 0 0 0 0 0 main::RUNTIME ]
fid_line_time 1 2 [ 0 1 ]
-fid_line_time 1 7 [ 0 2 ]
+fid_line_time 1 7 [ 0 1 ]
+fid_line_time 1 8 [ 0 6 ]
fid_line_time 2 1 [ 0 2 ]
fid_line_time 4 1 [ 0 1 ]
fid_line_time 5 1 [ 0 1 ]
@@ -49,7 +51,8 @@
fid_line_time 8 1 [ 0 2 ]
fid_line_time 9 1 [ 0 2 ]
fid_sub_time 1 2 [ 0 1 ]
-fid_sub_time 1 7 [ 0 2 ]
+fid_sub_time 1 7 [ 0 1 ]
+fid_sub_time 1 8 [ 0 6 ]
fid_sub_time 2 1 [ 0 1 ]
fid_sub_time 4 1 [ 0 1 ]
fid_sub_time 5 1 [ 0 1 ]
@@ -62,7 +65,7 @@
profile_modes fid_sub_time sub
sub_subinfo main::BEGIN [ 1 0 0 0 0 0 0 0 ]
sub_subinfo main::RUNTIME [ 1 1 1 0 0 0 0 0 ]
-sub_subinfo main::__ANON__[(eval 7)[test24-strevalc.p:7]:1] [ 8 1 1 1 0 0
0 0 ]
-sub_subinfo main::__ANON__[(eval 7)[test24-strevalc.p:7]:1] called_by 8 1
[ 1 0 0 0 0 0 0 main::RUNTIME ]
-sub_subinfo main::__ANON__[(eval 8)[test24-strevalc.p:7]:1] [ 9 1 1 1 0 0
0 0 ]
-sub_subinfo main::__ANON__[(eval 8)[test24-strevalc.p:7]:1] called_by 9 1
[ 1 0 0 0 0 0 0 main::RUNTIME ]
+sub_subinfo main::__ANON__[(eval 7)[test24-strevalc.p:8]:1] [ 8 1 1 1 0 0
0 0 ]
+sub_subinfo main::__ANON__[(eval 7)[test24-strevalc.p:8]:1] called_by 8 1
[ 1 0 0 0 0 0 0 main::RUNTIME ]
+sub_subinfo main::__ANON__[(eval 8)[test24-strevalc.p:8]:1] [ 9 1 1 1 0 0
0 0 ]
+sub_subinfo main::__ANON__[(eval 8)[test24-strevalc.p:8]:1] called_by 9 1
[ 1 0 0 0 0 0 0 main::RUNTIME ]
--
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]
