| line |
true |
false |
branch |
|
64
|
0 |
7 |
if (ref $_[0] and UNIVERSAL::can($_[0], "can") and UNIVERSAL::isa($_[0], "Lab::Instrument::Source"))
|
|
67
|
0 |
0 |
unless defined $_[1] and $_[1] =~ /^[0-9]*$/u
|
|
74
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
89
|
7 |
0 |
if (defined $self->default_device_settings) { }
|
|
90
|
0 |
7 |
if (not ref($self->default_device_settings) =~ /HASH/u) { }
|
|
|
7 |
0 |
elsif (scalar keys %{$self->default_device_settings;} == 0) { }
|
|
105
|
0 |
7 |
if (defined $self->config("max_channels"))
|
|
106
|
0 |
0 |
if (not $self->config('max_channels') =~ /^[0-9]*$/u) { }
|
|
114
|
0 |
7 |
if (defined $self->default_channel and $self->default_channel > $self->max_channels || $self->default_channel < 1)
|
|
124
|
0 |
7 |
if (defined $self->parent_source) { }
|
|
125
|
0 |
0 |
unless (UNIVERSAL::isa($self->parent_source, "Lab::Instrument::Source"))
|
|
136
|
0 |
0 |
if (not defined $self->gpData or !ref($self->gpData) =~ /HASH/u)
|
|
159
|
0 |
16 |
if (ref $config ne 'HASH') { }
|
|
175
|
42 |
223 |
if exists $self->default_device_settings->{$conf_name} and not defined $self->device_settings($conf_name)
|
|
186
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
194
|
0 |
0 |
unless exists $args->{'channel'}
|
|
199
|
0 |
0 |
unless $args->{'channel'} =~ /^[0-9]*/u
|
|
226
|
0 |
0 |
if ($target == $current_level)
|
|
230
|
0 |
0 |
if ($self->device_settings->{'gate_protect'} and $self->device_settings->{'gp_max_units_per_step'} < abs $target - $current_level) { }
|
|
257
|
0 |
0 |
if (defined $rate and not defined $time) { }
|
|
|
0 |
0 |
elsif (not defined $rate and defined $time) { }
|
|
|
0 |
0 |
elsif (defined $rate and defined $time) { }
|
|
269
|
0 |
0 |
if ($self->device_settings->{'gate_protect'}) { }
|
|
282
|
0 |
0 |
if ($self->device_settings->{'gate_protect'})
|
|
284
|
0 |
0 |
if ($target < $self->device_settings->{'gp_min_units'} or $target > $self->device_settings->{'gp_max_units'})
|
|
291
|
0 |
0 |
if (abs $rate > abs $self->device_settings->{'gp_max_units_per_second'})
|
|
301
|
0 |
0 |
if ($rate == 0) { }
|
|
|
0 |
0 |
elsif (abs($start - $target) / $rate > 176400) { }
|
|
|
0 |
0 |
elsif (abs($start - $target) / $rate < 0.1) { }
|
|
324
|
0 |
0 |
if ($target > $range) { }
|
|
|
0 |
0 |
elsif ($target < -$range) { }
|
|
339
|
0 |
0 |
if ($sections > 50)
|
|
355
|
0 |
2 |
unless (defined $target or ref $target eq "HASH")
|
|
369
|
0 |
1 |
unless (defined $upstep or defined $stepsize)
|
|
374
|
1 |
1 |
unless (defined $upstep)
|
|
378
|
0 |
2 |
if (defined $stepsize and defined $upstep and $upstep > $stepsize)
|
|
388
|
2 |
0 |
if ($target == $current)
|
|
392
|
0 |
0 |
if ($self->device_settings->{'gate_protect'} and $time) { }
|
|
|
0 |
0 |
elsif (not defined $time) { }
|
|
393
|
0 |
0 |
if (abs $target - $current > $apsec * $time)
|
|
406
|
0 |
0 |
if ($self->can('_sweep_to_level')) { }
|
|
413
|
0 |
0 |
if (abs $target - $current <= $upstep)
|
|
420
|
0 |
0 |
if ($target < $current)
|
|
436
|
0 |
0 |
if ($channel < 0)
|
|
441
|
0 |
0 |
if (int $channel != $channel)
|
|
458
|
2 |
0 |
unless ($device_settings->{'gate_protect'})
|
|
470
|
0 |
0 |
if (not defined $apstep or $apstep <= 0)
|
|
476
|
0 |
0 |
if (defined $apsec and $apsec > 0 and !defined($spsec) || $spsec < 0) { }
|
|
|
0 |
0 |
elsif (defined $spsec and $spsec > 0 and !defined($apsec) || $apsec < 0) { }
|
|
|
0 |
0 |
elsif (!defined($apsec) || $apsec <= 0 and !defined($spsec) || $spsec < 0) { }
|
|
491
|
0 |
0 |
if ($apsec <= $spsec * $apstep) { }
|
|
507
|
0 |
0 |
unless (defined $gp_max_units and defined $gp_min_units)
|
|
513
|
0 |
0 |
if ($gp_max_units <= $gp_min_units)
|