diff options
Diffstat (limited to 't/extends.t')
-rw-r--r-- | t/extends.t | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/t/extends.t b/t/extends.t new file mode 100644 index 0000000..8e45869 --- /dev/null +++ b/t/extends.t @@ -0,0 +1,37 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; +use Test::Fatal; + +{ + package Bar; + use Moose; +} + +{ + package Baz; + use Moose; + use Bread::Board::Declare; +} + +{ + package Quux; + use Moose; + use Bread::Board::Declare; +} + +{ + package Foo; + use Moose; + use Bread::Board::Declare; + + ::like(::exception { extends 'Bar' }, + qr/^Cannot inherit from Bar because Bread::Board::Declare classes must inherit from Bread::Board::Container/, + "error when inheriting from a non-container"); + ::like(::exception { extends 'Baz', 'Quux' }, + qr/^Multiple inheritance is not supported for Bread::Board::Declare classes/, + "error when inheriting from multiple containers"); +} + +done_testing; |