| /tmp/bf0GS1B6sl | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| statement | 6 | 10 | 60.0 |
| branch | n/a | ||
| condition | n/a | ||
| subroutine | 2 | 4 | 50.0 |
| pod | n/a | ||
| total | 8 | 14 | 57.1 |
| line | stmt | bran | cond | sub | pod | time | code |
|---|---|---|---|---|---|---|---|
| 1 | package MyTest1; | ||||||
| 2 | 2 | 2 | 4016720 | use Mite::Shim -all; | |||
| 2 | 7 | ||||||
| 2 | 49 | ||||||
| 3 | |||||||
| 4 | signature_for foo => ( | ||||||
| 5 | named => [ xxx => "Int", yyy => "Bool" ], | ||||||
| 6 | ); | ||||||
| 7 | |||||||
| 8 | sub foo { | ||||||
| 9 | 0 | 0 | my ( $self, $arg ) = @_; | ||||
| 10 | 0 | return [ $arg->xxx, $arg->yyy ]; | |||||
| 11 | } | ||||||
| 12 | |||||||
| 13 | package MyTest2; | ||||||
| 14 | 2 | 2 | 560 | use Mite::Shim -all; | |||
| 2 | 5 | ||||||
| 2 | 25 | ||||||
| 15 | extends 'MyTest1'; | ||||||
| 16 | |||||||
| 17 | signature_for '+foo'; | ||||||
| 18 | |||||||
| 19 | sub foo { | ||||||
| 20 | 0 | 0 | my ( $self, $arg ) = @_; | ||||
| 21 | 0 | return [ $arg->xxx, $arg->yyy ]; | |||||
| 22 | } | ||||||
| 23 | |||||||
| 24 | 1; |