use strict;
use warnings;
use Test::More 'no_plan';
use YAML;
BEGIN { use_ok("Tree::File::YAML"); }
my $config;
$config = Tree::File::YAML->new("examples/simple", { preload => 1 });
isa_ok($config, "Tree::File::YAML", "the root");
isa_ok($config->{data}{armies}, "HASH", "1-deep dir, preloaded");
isa_ok($config->{data}{armies}{data}{german},"CODE", "2-deep dir, promised");
$config = Tree::File::YAML->new("examples/simple", { preload => -1 });
isa_ok($config, "Tree::File::YAML", "the root");
isa_ok($config->{data}{armies}, "HASH", "1-deep dir, preloaded");
isa_ok($config->{data}{armies}{data}{german},"HASH", "2-deep dir, preloaded");