Changelogging
[gitmo/Mouse.git] / t / 600_todo_tests / 005_moose_and_threads.t
CommitLineData
fde8e43f 1#!/usr/bin/perl
2# This is automatically generated by author/import-moose-test.pl.
3# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
4use t::lib::MooseCompat;
5
6use strict;
7use warnings;
8
9use Test::More;
10use Test::Exception;
11
12
13=pod
14
15See this for some details:
16
17http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=476579
18
19Here is the basic test case, it segfaults, so I am going
20to leave it commented out. Basically it seems that there
21is some bad interaction between the ??{} construct that
22is used in the "parser" for type definitions and threading
23so probably the fix would involve removing the ??{} usage
24for something else.
25
26use threads;
27
28{
29 package Foo;
30 use Mouse;
31 has "bar" => (is => 'rw', isa => "Str | Num");
32}
33
34my $thr = threads->create(sub {});
35$thr->join();
36
37=cut
38
39{
40 local $TODO = 'This is just a stub for the test, see the POD';
41 fail('Mouse type constraints and threads dont get along');
42}
43
44done_testing;