The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/env perl

use strict;
use warnings;

use Test::More;                      
use Test::Moose;
use Treex::Core::Document;

my $doc = new_ok('Treex::Core::Document');
my $bundle = $doc->create_bundle();
my $bzone = $bundle->create_zone('en');
my $t_root = $bzone->create_ttree();
does_ok($t_root, 'Treex::Core::Node::Ordered', 'T-root is ordered');

done_testing;