use strict;
use warnings;
use Test::More;

use lib qw(t/lib);

BEGIN {
  eval { require Test::Memory::Cycle };
  if ($@) {
    plan skip_all => "leak test needs Test::Memory::Cycle";
  } else {
    plan tests => 1;
  }
}

use DBICTest;
use DBICTest::Schema;

import Test::Memory::Cycle;

my $s = DBICTest::Schema->clone;

memory_cycle_ok($s, 'No cycles in schema');