Revision: 1322
Author: [email protected]
Date: Wed Jul  7 08:23:48 2010
Log: Add $& to a couple of test files so we can test detection of PL_sawampersand

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

Modified:
 /trunk/t/test14.pm
 /trunk/t/test18-goto2.pm

=======================================
--- /trunk/t/test14.pm  Mon Mar 23 05:06:40 2009
+++ /trunk/t/test14.pm  Wed Jul  7 08:23:48 2010
@@ -10,7 +10,7 @@
 1;
 __END__
 sub foo {
-  1;
+  $&;
 }

 sub bar {
=======================================
--- /trunk/t/test18-goto2.pm    Mon Nov 16 02:48:55 2009
+++ /trunk/t/test18-goto2.pm    Wed Jul  7 08:23:48 2010
@@ -5,4 +5,6 @@
 delete $Test18::{longmess_jmp};
 *longmess_jmp  = *longmess_real;

+my $dummy = $&; # also test sawampersand
+
 1;

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