line |
true |
false |
branch |
17
|
2 |
0 |
if ($type =~ /HASH/) { } |
|
0 |
0 |
elsif ($type =~ /^Lab::Instrument/ and $_[0]{'IamaSource'}) { } |
71
|
9 |
13 |
if (ref($config) =~ /HASH/) { } |
|
5 |
8 |
elsif ($config) { } |
74
|
0 |
55 |
if (not defined $$self{'config'}{$conf_name} || defined $$config{$conf_name}) { } |
|
15 |
40 |
elsif (defined $$config{$conf_name}) { } |
93
|
5 |
0 |
unless defined $channel |
95
|
0 |
5 |
if $channel < 0 |
96
|
0 |
5 |
if int $channel != $channel |
98
|
3 |
2 |
if ($$self{'config'}{'gate_protect'}) { } |
105
|
0 |
5 |
if ($$self{'config'}{'fast_set'}) { } |
121
|
0 |
0 |
unless defined $channel |
123
|
0 |
0 |
if $channel < 0 |
124
|
0 |
0 |
if int $channel != $channel |
126
|
0 |
0 |
if ($$self{'config'}{'gate_protect'}) { } |
133
|
0 |
0 |
if ($$self{'config'}{'fast_set'}) { } |
157
|
1 |
1221 |
unless (defined $last_v) |
162
|
0 |
1222 |
if (defined $$self{'config'}{'gp_max_volt'} and $voltage > $$self{'config'}{'gp_max_volt'}) |
165
|
0 |
1222 |
if (defined $$self{'config'}{'gp_min_volt'} and $voltage < $$self{'config'}{'gp_min_volt'}) |
170
|
7 |
1215 |
if abs $voltage - $last_v < $$self{'config'}{'gp_equal_level'} |
173
|
1 |
1214 |
if (defined $voltperstep and abs $voltage - $last_v < $voltperstep) |
180
|
250 |
964 |
$voltpersec < $voltperstep * $steppersec ? : |
191
|
1214 |
0 |
if (not defined(my $last_t = $$self{'_gp'}{'last_settime_mus'})) { } |
|
0 |
0 |
elsif ($now - $last_t < 1000000 * $wait) { } |
201
|
1213 |
1 |
if (abs $voltage - $last_v > abs $step) |
223
|
0 |
0 |
unless (defined $last_v) |
228
|
0 |
0 |
if (defined $$self{'config'}{'gp_max_volt'} and $voltage > $$self{'config'}{'gp_max_volt'}) |
231
|
0 |
0 |
if (defined $$self{'config'}{'gp_min_volt'} and $voltage < $$self{'config'}{'gp_min_volt'}) |
236
|
0 |
0 |
if abs $voltage - $last_v < $$self{'config'}{'gp_equal_level'} |
239
|
0 |
0 |
$voltpersec < $voltperstep * $steppersec ? : |
250
|
0 |
0 |
if (not defined(my $last_t = $$self{'_gp'}{'last_settime_mus'})) { } |
|
0 |
0 |
elsif ($now - $last_t < 1000000 * $wait) { } |
260
|
0 |
0 |
if (abs $voltage - $last_v > abs $step) |
281
|
1205 |
7 |
unless (defined $last and abs $last - $this < $$self{'config'}{'gp_equal_level'}) |
293
|
0 |
0 |
if ($$self{'subsource'}) { } |
304
|
0 |
0 |
if ($$self{'subsource'}) { } |
314
|
3 |
5 |
unless defined $channel |
324
|
0 |
0 |
if ($$self{'subsource'}) { } |
333
|
0 |
0 |
if ($$self{'subsource'}) { } |
343
|
0 |
0 |
if ($$self{'subsource'}) { } |