view release on metacpan or  search on metacpan

t/01-all_reachable.t  view on Meta::CPAN

use strict;
use warnings;

use Algorithm::Graphs::Reachable::Tiny qw(all_reachable);

use Test::More tests => 36;

## use Data::Dumper;

{
  # Empty input
  is_deeply(all_reachable({}, {}), {}, "all_reachable({}, {})");
  is_deeply(all_reachable({}, []), {}, "all_reachable({}, {})");

  is_deeply(all_reachable([], {}), {}, "all_reachable([], {})");
  is_deeply(all_reachable([], []), {}, "all_reachable([], {})");
}