| blib/lib/Device/BusPirate/Mode/I2C.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 14 | 57.1 |
| line | true | false | branch |
|---|---|---|---|
| 102 | 2 | 1 | if (defined $args{'speed'}) |
| 103 | 0 | 2 | unless defined(my $speed = $SPEEDS{$args{'speed'}}) |
| 112 | 0 | 3 | unless $response eq "\cA" x length($bytes) |
| 178 | 0 | 15 | unless $+[0] == length $bytes |
| 248 | 0 | 1 | unless $address >= 0 and $address < 128 |
| 274 | 0 | 1 | unless $address >= 0 and $address < 128 |
| 302 | 0 | 1 | unless $address >= 0 and $address < 128 |