big refactoring

1 files changed, 26 insertions, 0 deletions

diff --git a/lib/GridFiller/Types.pm b/lib/GridFiller/Types.pm
new file mode 100644
index 0000000..fb7fc9b
--- /dev/null
+++ b/lib/GridFiller/Types.pm
@@ -0,0 +1,26 @@
+package GridFiller::Types;
+use MooseX::Types -declare =>
+    [qw(
+           GridT GridStatusT
+           CharT LetterCellT ResultT
+           WordListT
+   )];
+use MooseX::Types::Moose qw(Str ArrayRef Bool Int);
+use MooseX::Types::Structured qw(Tuple);
+
+subtype CharT,
+    as Str,
+    where { length($_) == 1 };
+
+subtype LetterCellT,
+    as Tuple[Int,CharT];
+
+subtype GridT, as ArrayRef[ArrayRef[Str]];
+
+subtype GridStatusT, as ArrayRef[ArrayRef[Int]];
+
+subtype WordListT, as ArrayRef[Str];
+
+subtype ResultT, as ArrayRef[ArrayRef[LetterCellT]];
+
+1;