File Coverage

blib/lib/Data/Range/Compare/Stream/Iterator/Consolidate/FileAsc.pm

Criterion	Covered	Total	%
statement	21	21	100.0
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod	1	1	100.0
total	29	29	100.0

package Data::Range::Compare::Stream::Iterator::Consolidate::FileAsc;

use strict;
use warnings;
use base qw(Data::Range::Compare::Stream::Iterator::File);
use Data::Range::Compare::Stream;
use Data::Range::Compare::Stream::Iterator::Consolidate::Result;

use constant RESULT_FROM=>'Data::Range::Compare::Stream::Iterator::Consolidate::Result';

sub get_next {
  my ($self)=@_;
  my $range=$self->SUPER::get_next;

  return $self->RESULT_FROM->new($range,$range,$range);
}

1;