File Coverage

blib/lib/Graph/Writer/Sparse6.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod			n/a
total	22	22	100.0

# Copyright 2015, 2016, 2017 Kevin Ryde
#
# This file is part of Graph-Graph6.
#
# Graph-Graph6 is free software; you can redistribute it and/or modify it under
# the terms of the GNU General Public License as published by the Free
# Software Foundation; either version 3, or (at your option) any later
# version.
#
# Graph-Graph6 is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
# more details.
#
# You should have received a copy of the GNU General Public License along
# with Graph-Graph6.  If not, see .

package Graph::Writer::Sparse6;
use 5.006;
use strict;
use warnings;
use Graph::Writer::Graph6;

use vars '@ISA','$VERSION';
@ISA = ('Graph::Writer::Graph6');
$VERSION = 7;

# uncomment this to run the ### lines
# use Smart::Comments;


sub _init  {
  my ($self,%param) = @_;
  ### Graph-Writer-Sparse6 _init() ...
  ### %param

  $self->SUPER::_init(format => 'sparse6', %param);

  ### self: %$self
}

1;
__END__