blib/lib/JSON/TypeEncoder.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 26 | 28 | 92.8 |
line | true | false | branch |
---|---|---|---|
23 | 0 | 48 | if $@ |
31 | 17 | 85 | if (_is_subtype($type, &Maybe())) |
36 | 20 | 0 | _is_subtype($type, &Str()) ? : |
23 | 20 | _is_subtype($type, &Num()) ? : | |
16 | 43 | _is_subtype($type, &Bool()) ? : | |
10 | 59 | _is_subtype($type, &ArrayRef()) ? : | |
7 | 69 | _is_subtype($type, &Tuple()) ? : | |
26 | 76 | _is_subtype($type, &Dict()) ? : | |
44 | 17 | 85 | if ($maybe) |
62 | 6 | 23 | if (_is_subtype($stype, &Optional())) |
68 | 26 | 3 | $i == 0 ? : |
71 | 6 | 23 | if ($optional) |
118 | 375 | 2370 | unless $type |
119 | 2245 | 125 | unless $type->name eq $other->name |