| blib/lib/Statistics/R/IO/REXPFactory.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 29 | 51.7 |
| line | l | !l | condition |
|---|---|---|---|
| 461 | 23 | 0 | exists $vars{$name} and die "Variable $name is already defined in the environment" |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 253 | 275 | 22 | 33 | $row_names and $row_names->type eq 'integer' |
| 297 | 0 | 33 | $row_names and $row_names->type eq 'integer' and not defined $row_names->elements->[0] | |
| 351 | 5 | 0 | 50 | defined $re and defined $im |
| 527 | 0 | 0 | 10 | ref $class eq 'ARRAY' and scalar @{$class;} == 1 |
| 530 | 0 | 0 | 10 | ref $package eq 'ARRAY' and scalar @{$package;} == 1 |
| 545 | 308 | 6 | 0 | ref $data and ref $data ne ref [] |
| line | l | !l | condition |
|---|---|---|---|
| 298 | 1725 | 0 | shift @args || [] |
| 381 | 18 | 0 | shift() || (return) |
| 425 | 706 | 0 | shift() || (return) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 505 | 0 | 0 | 0 | $body // 'Statistics::R::REXP::Null'->new |