blib/lib/Math/Random/MT/Perl.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 24 | 26 | 92.3 |
line | true | false | branch |
---|---|---|---|
31 | 16 | 20 | if (ref $self) { } |
36 | 1 | 19 | unless defined $gen |
45 | 16 | 8 | if (ref $self) { } |
49 | 0 | 8 | unless defined $gen |
68 | 14 | 2 | defined $seeds[0] ? : |
3 | 16 | @seeds > 1 ? : | |
78 | 7 | 3 | unless (@seeds) |
127 | 3 | 0 | $N > $n ? : |
135 | 3 | 1869 | if ($i >= $N) |
136 | 468 | 1404 | if ($j >= $n) |
143 | 3 | 1866 | if ($i >= $N) |
161 | 12 | 48 | if ($self->{'mti'} >= $N) |
187 | 7 | 10 | if $sym eq 'srand' or $sym eq 'rand' or $sym eq 'irand' |