diff options
| author | dakkar <dakkar@thenautilus.net> | 2010-07-11 22:44:16 +0100 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2010-07-11 22:44:16 +0100 |
| commit | 2a1c8d80336a93bdf5b89008917947b4ca912f27 (patch) | |
| tree | 773f54cf2066fcbd0684b1872709d35d02f2fda8 /lib/Thread/Task/Types.pm | |
| parent | test for TT::Thread->master (diff) | |
| download | Thread-Task-2a1c8d80336a93bdf5b89008917947b4ca912f27.tar.gz Thread-Task-2a1c8d80336a93bdf5b89008917947b4ca912f27.tar.bz2 Thread-Task-2a1c8d80336a93bdf5b89008917947b4ca912f27.zip | |
test for TT::Handle
Diffstat (limited to 'lib/Thread/Task/Types.pm')
| -rw-r--r-- | lib/Thread/Task/Types.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Thread/Task/Types.pm b/lib/Thread/Task/Types.pm index 8a4d044..9ee87ed 100644 --- a/lib/Thread/Task/Types.pm +++ b/lib/Thread/Task/Types.pm @@ -5,15 +5,21 @@ use MooseX::Types Handle_T Worker_T Task_T + TaskRev_T + Manager_T Conduit_T Finished_ET Queue_T Queue_Ev_T )]; +use MooseX::Types::Moose qw(Int); class_type Handle_T, { class => 'Thread::Task::Handle' }; class_type Worker_T, { class => 'Thread::Task::Worker' }; class_type Task_T, { class => 'Thread::Task' }; +class_type Manager_T, { class => 'Thread::Task::Manager' }; + +subtype TaskRev_T, as Int; role_type Conduit_T, { role => 'Thread::Task::Role::Conduit' }; |