| blib/lib/Lisp/Printer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 77 | 151 | if (ref $obj) { } |
| 27 | 49 | 28 | if (symbolp($obj)) { } |
| 2 | 26 | elsif (vectorp($obj)) { } | |
| 1 | 25 | elsif (ref $obj eq 'Lisp::Cons') { } | |
| 25 | 0 | elsif (ref $obj eq 'ARRAY') { } | |
| 0 | 0 | elsif (ref $obj eq 'HASH') { } | |
| 49 | 2 | 149 | if (not defined $obj) { } |
| 145 | 4 | elsif ($obj =~ /^[+-]?\d+(?:\.\d*)?$/) { } |