[Sblim-commit] testsuite consistence.pm,1.35,1.36

[Tyrel D. <ty...@us...>]

Update of /cvsroot/sblim/testsuite
In directory vz-cvs-3.sog:/tmp/cvs-serv14151

Modified Files:
	consistence.pm 
Log Message:
Fixed 3261822: perl errors seen at runtime with perl5.10


Index: consistence.pm
===================================================================
RCS file: /cvsroot/sblim/testsuite/consistence.pm,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -d -r1.35 -r1.36
--- consistence.pm	19 Jun 2009 00:27:08 -0000	1.35
+++ consistence.pm	31 Mar 2011 00:52:24 -0000	1.36
@@ -52,21 +52,21 @@
 #                      asked for in parameter ${class} -> Provider failure ?
 #
 
-my $CLASS="";
+our $CLASS="";
 my $INPUT_FILE;
 
 my $REPORT_FILE;
 my $OLD_HDL;             # save file handle of STDOUT; necesarry when report file is generated
 
-my $keyname;
-my $keyval;
-my $inst;
-my $checkRef_ain;
-my $checkRef_gi;
-my $sourceClass;
-my $targetClass;
+our $keyname;
+our $keyval;
+our $inst;
+our $checkRef_ain;
+our $checkRef_gi;
+our $sourceClass;
+our $targetClass;
 
-my @rc = (0,"");
+our @rc = (0,"");
 
 
 #******************************************************************************#