t/extends-role.t

   1 use strictures 1;
   2 use Test::More;
   3 use Test::Fatal;
   4
   5 {
   6     package MyRole;
   7     use Moo::Role;
   8 }
   9 {
  10     package MyClass;
  11     use Moo;
  12     ::isnt ::exception { extends "MyRole"; }, undef, "Can't extend role";
  13 }
  14
  15 done_testing;