ViewVC Help
View File
|
Revision Log
|
Show Annotations
|
Download File
/
cvs
/
Devel-FindRef
/
t
/
01_padarray.t
Revision:
1.1
Committed:
Fri May 16 06:41:37 2014 UTC
(10 years ago) by
root
Content type:
application/x-troff
Branch:
MAIN
CVS Tags:
rel-1_46, rel-1_44, rel-1_45, rel-1_43, HEAD
Log Message:
*** empty log message ***
File Contents
#
User
Rev
Content
1
root
1.1
BEGIN { $| = 1; print "1..1\n"; }
2
3
use Devel::FindRef;
4
5
sub xx {
6
\my $x
7
}
8
9
my $y = xx;
10
11
Devel::FindRef::track $y;
12
13
print "ok 1\n";