9 if ($module->isa('Moo::Object')) {
10 my $meta = $module->meta;
11 foreach my $name ($meta->get_attribute_list) {
12 my $attr = $meta->get_attribute($name);
13 if (my $tc = $attr->type_constraint) {
14 pass("${module}->${name} isa ${tc}");
16 fail("${module}->${name} UNTYPED");
22 foreach my $file (io('lib')->all_files(0)) {
23 (my $name = $file->name) =~ s/^lib\///;
25 (my $module = join '::', split '/', $name) =~ s/\.pm$//;
26 check_module($module);