5 use Test::Moose qw( with_immutable );
10 use MooseX::StrictConstructor;
14 eval { Foo->new( __INSTANCE__ => Foo->new ); };
15 ok( !$@, '__INSTANCE__ is ignored when passed to ->new' );
17 eval { Foo->meta->new_object( __INSTANCE__ => Foo->new ); };
18 ok( !$@, '__INSTANCE__ is ignored when passed to ->new_object' );