perl, defined(%hash) is depreciated

This commit is contained in:
rlar 2012-01-15 16:46:12 +00:00
parent 6a96242e1f
commit ad92ca8f24
3 changed files with 9 additions and 8 deletions

View File

@ -1,7 +1,12 @@
2012-01-15 Robert Larice
* tests/bin/modelQaTestRoutines.pm ,
* tests/bin/runQaTests.pl :
perl, defined(%hash) is depreciated
2012-01-15 Holger Vogt
* tests\bin\modelQaTestRoutines.pm: $platform
should not contain '/' , removed in line 700
2012-01-13 Robert Larice
* src/spicelib/devices/hisimhv/.cvsignore :
add missing .cvsignore file

View File

@ -198,11 +198,7 @@ sub processTestSpec {
@main::Outputs=();
@main::ModelParameters=();
undef(%main::BiasFor);
if (defined(%main::isGeneralFloatingPin)) {
%main::isFloatingPin=%main::isGeneralFloatingPin;
} else {
undef(%main::isFloatingPin);
}
%main::isFloatingPin=%main::isGeneralFloatingPin;
undef(%isAnalysisPin);
undef(@main::Temperature);
foreach (@Spec) {

View File

@ -297,7 +297,7 @@ if ($reallyVerbose) {
$flag="";
}
foreach $test (@Test) {
next if (defined(%doTest) && !$doTest{$test});
next if (!$doTest{$test});
if ($verbose) {print "\n****** Running test ($simulatorName): $test"}
@ -311,7 +311,7 @@ foreach $test (@Test) {
} else {
$refFile="$resultsDirectory/$test.standard";
}
next if (defined(%doVariant) && !$doVariant{$variant});
next if (!$doVariant{$variant});
$simFile="$resultsDirectory/$test.$variant";
if ($outputDc) {
if (($forceSimulation || ! -r $simFile) && !$onlyDoComparison) {