File Coverage

blib/lib/KinoSearch1/Store/OutStream.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 20 21 95.2


line stmt bran cond sub pod time code
1             package KinoSearch1::Store::OutStream;
2 40     40   206 use strict;
  40         78  
  40         1268  
3 40     40   206 use warnings;
  40         75  
  40         1126  
4 40     40   521 use KinoSearch1::Util::ToolSet;
  40         93  
  40         7929  
5 40     40   218 use base qw( KinoSearch1::Util::CClass );
  40         89  
  40         4891  
6              
7             sub close {
8 1020     1020 0 4335 my $self = shift;
9 1020         3910 $self->flush;
10 1020         12376 CORE::close $self->get_fh;
11             }
12              
13             1;
14              
15             __END__