package GridFiller::Result;
use Moose;
use namespace::autoclean;
use GridFiller::Types qw(GridT WordListT);
use GridFiller::Constants ':directions';
use Carp;

with 'MooseX::Log::Log4perl';

has leftover_words => (
    isa => WordListT,
    is => 'ro',
    traits => ['Array'],
    handles => {
        mark_leftover => 'push',
    },
    lazy_build => 1,
    clearer => '_reset_lw',
);

sub _build_leftover_words {
    return [ ];
}

has source_grid => (
    isa => GridT,
    is => 'ro',
    required => 1,
);

sub place_word_at {
    die "unimplemented";
}

sub reset {
    my ($self) = @_;

    $self->_reset_lw;

    return;
}

1;

__END__

=head1 AUTHOR

Gianni Ceccarelli <dakkar@thenautilus.net>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2012 by Gianni Ceccarelli.

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU Affero General Public License as
published by the Free Software Foundation, version 3.

=cut